

$2.50 
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Australia A $400 New ZoaUintf NZ S 4 00 

Singapore S S 6 00 Hong Kong h S20 00 

Malays M $ 8 DO 
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If you have a problem that can be solved by a computer— we have a systems solution. 

# Two central processors with maximum RAM capacities of 56K and 384 K bytes 

# Three types of disk drives with capacities of 1 75K, 1 .2M and 1 6M bytes 

# Two dot matrix printers with 80 and 132 line capacity 

A Selectric typewriter interface and a daisy wheel printer 

Match these to your exact need, add one or more of our intelligent terminals and put together 
a system from one source with guaranteed compatibility in both software and hardware. 

Southwest Technical Products systems give you unmatched power, speed and versatility. They 
are packaged in custom designed woodgrain finished cabinets. Factory service and support on 
the entire system and local service is available in many cities. 




SOUTHWEST TECHNICAL PRODUCTS CORPORATION 

219 W. RHAPSODY 

SAN ANTONIO, TEXAS 78216 (512) 344 0241 




Something Dew on the Horizon 

from 
Technical Sy/temr Con/ultant/ 



Extended BASIC for 6800 and 6809 

Finally a BASIC lor serious business 
applications or scientific programming ts 
available, All the features of our regular BASIC 
are supported— and more. Floating point 
calculations are earned out to an internal 
accuracy of 17 digits Most math functions are 
accurate to 16 digits with a minimum accuracy 
of 13 5 digits Integer vanables have been 
included to allow last execution ol control loops 
and array indexing Even with the double 
precision math package, this BASIC is still one 
of the fastest around 

The business programmer will appreciate the 
versatile PRINT-USING capabilities which 
include dollar and aslensk fill, trailing minus 
sign, imbedded commas, and scientific 
notation New string functions have been 
added for string searching <INSTR) and for 
creating a stnng which is Ihe dale (DATESS) 
DPEEK and DPOKE are 16-bif peek and poke 
type functions The SCALE command has 
been included to eliminate the round-off errors 
typically encountered in binary math packages 
The INCHS function allows single character 
input from the terminal Programmer control of 
control C breaks is also included 
Overall the Extended BASIC is the most 
complete BASIC offered for micro users and is 
only available on FLEX'* disk A system with at 
least 32K ot user space is recommended. 
Specify 8" or 5" media (5" 6800 is FLEX™ 2 0) 
and either the 6800 or 6809 version when 
ordenng 

AP68-12 6800 Extended BASIC $100 

SP09 6 6809 Extended BASIC $100 



BAS IC Precompiler 

This program allows the creation of BASIC 
programs without the use of line numbers or 
reslnclive two character variable names 
Alphanumeric line and subroutine labels may 
be used, as well as variable names of any 
length Comment lines are marked with non 
alphanumencs for easy readability The output 
ot the precompiler is in the standard BASIC 
compiled form This allows applications 
programs to be written, precompiled, and then 
distributed in a non-source form The 
precompiler can only be used with one of 
Technical Systems Consultants' BASICS. 
Specify 8" or 5" (5" 6800 is FLEX™ 2 0) when 
ordering 



AP68-13 


Single Precision 






6800 Precompiler 


$40 


AP68-14 


Double Precision 






6800 Precompiler 


$50 


SP09-7 


Single Precision 






6809 Precompiler 


$40 


SP09-8 


Double Precision 






6809 Precompiler 


$50 



FLEX /s a registered trademark of Technical 
Systems Consultants. Inc 




technical /y/tem/ 
con/ultant/, inc 
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-ITEMS SUBMITTED FOR PUBLICATION - 
(Letters to the Editor for Publication) All 'letters to the 
Editor' should be substantiated by facts. Opinions should 
be indicated as such. All letters must be signed. We are 
interested in receiving letters that will benefit or alert our 
readers. Praise as well as gripes is always good subject 
matter. Your name may be withheld upon request. If you 
have had a go'id experience with a 6800 vendor please 
put it in a letter. If the experience was bad put that in a 
letter also. Remember, if you tell us who they are then it is 
only fair that your name 'not* be withheld. This means that 
all letters published, of a critical nature, cannot have a 
name withheld. We will attempt to publish verbatim' 
letters that are composed using good taste/ We reserve 
the right to define (for '68' Micro) what constitutes good 
taste 

(Articles and items submitted for publication) Please, 
always include your full name, address, and telephone 
number. Date and number all sheets. TYPE them if you 
can, poorly handwritten copy is sometimes the difference 
between go, no-go. All items should be on 8X11 inch, 
white paper. Most all art work will be reproduced photo- 
graphically, this includes all listings, diagrams and other 
non-text material. All typewritten copy should be done 
with a NEW RIBBON. All hand drawn art should be black 
on white paper. Please no hand written code items over 
50 bytes. Neatly typed copy will be directly reproduced. 
Column width should be 3% inches. 

(Advertising) Any Classified: Maximum 20 words. All 
single letters and/or numbers will be considered one (1) 
word. No Commercial or Business Type Classified 
advertising. Classified ads wifl be published in our 
standard format. Classified ads $7.50 one time run, paid 
in advance. 

Commercial and/or Business advertisers please write 
or phone for current rate sheet and publication lag time. 

'68* Micro Journal 



SEE GHOST AD PAGES 38 & 43 




AX. POWER 
CONTROL for ALL 
COMPUTERS or 
COMPLETE TURNKEY 
SYSTEMS 

Interface TO the Real World with GIMIX Relay 
Driver Boards. Connects to any Computer 
through a 20 ma. current loop (up to 4 
Boards 128 Relays per port). 

Interface FROM the Real World with GIMIX 

* OPTO BOARDS \v? ro 34 swift* closure* win cos 8 bit 
Parallel I/O Ponl 

* 16 SUTTON KEYPADS 

* 35 BUTTON ALPHANUMERIC KEYPADS 

A Broad Range ot 6800 Systems 
and Boards Compatible with 
Other SS50 Products such as 
SWTP and MSI 




MAINFRAME: includes chassis, power 
supply sw4cNb. tan and mater board S 798.19 
16K SYSTEMS: Matarratue plus 6800 CPU, 

16K Sialic Ram and choice ot I/O $1 344.29 
Other packages available 

6600/6609 MOTHER BOARD 

H*V»«v monf iguratti to o*n> you the u*m*t w**]<ny tor « 
wnh venoua 8800 and 66001 8860 and SSflOC but eontkguraiJom 
Gottpt/to 1 frint io *«ure fang talk*) etectnce) contact tor pro!**- 
Ikon again* cnnmkai rnt»aenttp*net0lar*'»«ani DIFe*tich »tJ 
dnmaabft) 33 0* WO •KM* conhgv*ab»e to 4 or 16 decooad a* 
itiiMi Thti^ryo^W^»Otitocl»*»»adt»M^itob»OI^*tt£t>io 
any 32. 6* or i2B bfto ba*da/i and cm aaao 0* fr a a h aaJ An oft 
board baud r«to generator ponds 9 aa»^rd DauO ram hom 7$ 
1o90Oa A i«9M HP>wrt» aifowa easy selection or up to f»* baud 
file*. Ttio Prve baud raia moo* on <ne 90 pin bu» can 6* iwvir 
dboanuecled Horn in* 30 P»n bu* lor um ea u*e< doiired lb** (ok 
landed a d o>a ■**>■> ale) Anop1tor>Ai*ki*W>o»ra>lLtorih»flBW 
CPU ato«saift*c*ffgthac«x**c^*fftv«va»an»Oo*nsots 
— ■ —i ■ il (lha> aft?** fcy »i*jt«i* uwng HAv et> carda web S 2 
Mt\.«erJu CPU* UOianaUOIoitfteSOpmbuecenba strapped to 
U03 and UWor Ihe30pmbua A lua> tfttfkM < 000" lf***i arxfcej 
aided P d board win nolt* r#duc>ng ground imea on irte bottom 
akto Ihur m(w«i« 4U data, addresa, and atonal Itne*. and a full 
oramd Dteno on the top aids Bcnmtoi ti»Qv*t butleru* of all ad 
MM data, and control atonato a w poe 
btocfc tor ail power and otter aiternat i 
own pw u i a* larm^ig of -m 



Tl TMS 4044's - 10% SUPPLY 

(Nor en "04C7Vj/0#if. tout rrtd r«*7 fftJflgj) 1 

450 ns S$.90each 250 ns $6,90 each 
8KPR0M BOARD % 98.34 

4 KPPD PROW BOARD 6orniJrandDu{H(u1iK 198,35 
2 rWS FACTORY PRIME 450 its each 7.90 

64 Of #*!$ VIDEO BOARD 198.71 

80 x 24 SUPER VIDEO BOARD wflh usw programmablD RAM 
cteraclftr general* 458.76 

SerlaU/Ot t Port S 88,41 4 Pan 198,43 

Pdrd!lBil/0* 2 Pott S 88.42 8 Pari 198.45 
Add $5 handling ciurge on orders under $200 



inc. 



Gimix 

1337 WEST 37th PLACE 
CHICAGO, ILLINOIS 60609 
(312) 927-5510 • TWX 910 221 4055 

Quality Electronic products since 197$. 



16K STATIC RAM SSSTSTABlg, KKn 

ouch block can bf * separately addressed 

• aeperately me bird or dtiabted ^separately protected 

UNDER BOTH SOFTWARE AND HARDWARE CONTROL 



SD ft h 6 h i 
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• FULLY SOCKETED 

• COMPLETE WITH 
TMS 4044s 



and its also SOFTWARE CONTROLLABLE $368.16 

Under software you can program each 4K blocks address and you can 
enable/disable or write protect each 4K block. The CPU can read the status 
of the software control registers lor each 4K. This allows expansion of 
memory way beyond 65K; or allows multi-tasking with just one 16K board; all 
with very little software overhead. (We have calculated that you can put 
13,000 of these boards in a system — that's 208 megabytes, but we do not 
intend to make either a bus or power supply that size.) All registers included 
— no phantom lines needed. 

* Facilitates multiprogramming, time-sharing, and sofware development. 

* All Gimix memory boards are assembled, burnMn for 2 weeks, and 
tested at 2Mh*. 

AS ABOVE, BUT WITHOUT SOFTWARE CONTROL 

AND UNSOCKETED $298.13 



GIMIX 6800 
CPU BOARD 

* 6800 MPU a 4K EPROM 
a 3 Programmable limers 

a 128 byte RAM 

* DIP-switcb addressing and 
enabling or disabling for 

software use versatility 



ThJi board I 

.- Crystal coMrolled 6800 MPU using a 6B7ft ctocKflanaralot 

s- 14411 bii-rala flenaratoi wild it«o«n cryatol inal pfoWdat baud ratal Tram HO 1o 0600 

- 128 Byia 6810 SCRAfCHPAD RAM. wbtch can b* DlPawrtch add'taaod to any >2S byia boundary, or diaabiod 

*■ Go*d Sua Con nac tor a 

BoMArod lor raliabMtty and data integrity Air address output data input and ourpgi hart input 

eiocK roeol control end baud rale oulpul i-naa ai« bulfeied Manual twtrt knptn rme « buttered 

end debouncod IRO and nMI ^rvee *tm d.raci m (6 8K puiiup} DMA capabiiiiy irvougit cycle 

ftiaaimg or hail 

A W ROM SECTION THAT HAS: 

Socket* toi 4 2TOB E PROMS wntch can be DlP-mwItcfi addraatad to any 4K boundary, or dtfabtod Dual addraaa ewticft lata 

ana PROM raesvno to bain £000 end FO00 for MiKflUQ compataWhty Spin addraaa aireppino olacea PflOMS a I WOO 

E400. €000. fOOO it daauad 

Plua Thraa Proorammabla Tlroera (optional) 

Eliminaie Iha n««d for edllwars limino foooe A 6840 aolt*are programmable timar prowidee 3 

independent 16-bfl couniera which may be used to ceuee tnterrupia and/or generate oulpul 

aignala They can be uaed kndkvtOaal^y or in combination They may be programmed lor one-ahoi 

t<m»ng or lor regular m. larval* Applicattona lor iha limara Include heQuottcy inaaauiomonla, avant counting, 

mtafvel rraMauruvg, and simitar laafca Tney can be uaed foi souere ware gena««iion gated delay aignaJi. 

ehigle Puiaee ot controlled ovation. %no pwiee wtoih modulalton DlPawitcn addrfatabie to any 6 byta 

Boundary Additional [MPtwtth ptavtlona oonlroi IRQ or KMI mtenupt cftcacaet as n«A aa onabkng or < 




DIGITAL 

% SERVICE 8c 
DESIGN 
| P.O. BOX 741 

' NEWARK, OHIO 43055 
Phone (614) 366 6314 




DSD P/R-32K $27.00 

32K or 16K EPROM & RAM memory card. 
2716 2K x 8 or 2758 1K x 8 5V only EPROMS. 
TMS 401 6 2K x 8 or MK 41 1 8 1 K x 8 5V RAMS. 
Up to 4 independent addressed 8K blocks. Dip 
switch or jumper selected. Size 9" x 5 1 /2" 

*>!!!hiiii» 
» hiijiui i 
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DSD 2114-16K $27.00 

Full Static 16K Ram memory card designed to 
use the 21 1 4 or TMS 4045 1 024 x 4 Static Ram. 
The card has two independent addressed 8K 
memory blocks. Card size 9" x 5%'\ Power 
requirements 7-8V unreg. @ 3.5A. 

DSD U P 8255M $14.00 

Universal parallel interface card with wire wrap 
area using INTEL'S 8255 parallel peripheral 
interface chip. 24 programmable I/O lines. 
(Three 8 bit Ports or Two 8 bit Ports with hand- 
shaking) Card size 5Vi" x 5" Standard SS-50 30 
pin I/O BUS. 5V only. 

Cards are bare with data and edge connector. 
Ohio residents add 4 1 /2% sales tax. 

*6847 Color Graphic card in design* 



SALE 



COMPUTE RWARE 

wants to sell 
PRINTERS 

! 

CHECK THESE PRICES 

Awflex DP 8000 (UPPER* Mjwef ws«i $675 

CanKpnss Model 730 WPPfcR Glower easel 875 

Centronics Model 781 (UPPER t lower easel H7S 

Centronics Model 704 (9*9 U/l wiin decenders) 2\?S 

SWTPC PR 40 w>th Cover & Caole (assembled) 350 

ribbons, cables, interlaces In slock 
(limited quantities - ends Nov 30) 



terms 



FOB Enclnnas 
P/epaid. Bank Card, or UPS CO D 



COMPUTERWARE 



Call 

(714)4360512 
ask tor Paul 



PO 80x668 
151?£ncmiTasBivd 
EncmitasCA 92024 



M6800 CODE GENERATER 

SIMPLIFIES CODING 

GREATLY REDUCES CODEING TIME BY USE OF A 
FEW SIMPLE VERBS 

AUTOMATIC GENERATION OF REFERENCED STOR- 
AGE 

STATEMENTS SUCH AS: 



OPEN 

READ 

COMP 

BEQ 

MOVE 

DISP 

COPY 



LETFIL 
LETFIL 

LETREC* END OF FILE' 
EOJ 

LETREC + 5, OUTREC+25. 50 
ENTER TODAYS DATE' 
DATE. RTN 



ARE KEY WORDS wilh Attributes used in generating 
Code. Ready for Assembly. 

Frequently used functions such as dating routines, 
arithmatic equations, common file handling routines, Etc. 
need only be copied just prior to assembling, thus 
reducing the need to have those routines duplicated 
through many programs. 

FITS IN UNDER 5K 

DOS/SWTBUG COMPATABLE {Easily modified to ac- 
comodate other systems) 

FULLY COMMENTED ASSEMBLY LISTING WITH 
DOCUMENTATION 

M00400 LISTING ONLY $10.00 

M00400C ON CASSETTE $12.00 

M00400D On 5V4 SSB DISC $14.25 

WRITE TO: Gary A. Magnusen 
208 Tinkler 

Lafayette, Indiana 47901 
1-31 7-742-1 S65 
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1-Year $14 50 2 Years $26 00 3 Years $36.50 

OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Master Charge Q — VISA Q 

Card # . . Exp. Date 



For □ 1-Year □ 2 Years □ 3 Years 

Enclosed: $ 

Name 



Street 
Ci y 



State 



Zip 



My Computer Is; 



68 MICRO JOURNAL 
3016 Hamlll Road 
HIXSON, TN 37343 



jih: isomers kor 

6800 



COMIHTKRS 




16 CHANNEL A/D BOARD 

• 8 BIT DATA 

• SOFTWARE CONTROLLED GAIN 

• 3300 SAMPLES PER SECOND 

• t 0.7% ACCURACY 

COMPLETE KIT: AD-16 $69,95 

Terms: Cash, MC or Vila; Shipping h Handling 42.00 



Order Phone (505> 294-4623 
P.O. Bom 5615 
Albuquerque, N.M. 87185 




'J PC product i 



jih: i>koj>iicts for 

6800 



COMPUTERS 




High Performance Cassette Interface 

• FAST . 4800 Baud Loads 4K in 8 Secondsl 

• RELIABLE • Error Rate Lesa Than 1 rn 10* Bytes 

• CONVENIENT - Plugs Directly inio The SWTPC. 

• PLUS • A Fully Buffered 8 Bit Ouiput Port Provided, 

• LOW COST - $49 95 For Complete Kit 

• OPTIONAL * CFM/3 File Manager. 

Manual & Listing $19 95 
iFo» Cassette Add* $ 6 95 



TERMS CASH. MC or VtSA, Shipping & Handling WOO 



*JPC products 



Order Phone 1505) 294-4623 
P.O. Box 5615 
Albuquerque, N.M. 87185 



MINIDISK* 2K EPROM DOS FOR 
PERCOM LFD 400 USERS 

{EPROMS INCLUDED. 2708a> 

COMMANDS; LOAD, SAVE. ANALYZE DISK SPACE. 
OPEN. 

PRINT DIRECTORY: REMOVE, CHANGE. RUN, COPY. 
SQUASH. ADD, GOTO EXIT. 

Disks can be selected by dnve number or disk name . Single 

or dual drive resident copy. 

Changecommand checks to see if changeto name is In use. 

Save and Copy check (or du plicate Me names and gives the 

option to remove or keep the present file. 

Wtld card character (or file names, usable with all commands 

specifying file names. 

Removeofites are made available to directory (or any use. 

Plus many more useful and time saving features 

PATCHES FOR: 
SWTPCORES —allows access toallminidlsk + commands, 
adds disk & memory options + more. 
SWTP BASIC — access to all MINIDISK + commands. 
SWTP ASSEMBLER -allows multiple CORES hies to be 
assembled & linked through symbol table. 
MICRO WARE AB ASIC 1 —a Hows use of cores (or editor. 
Specify input and output filenames AND MORE IN WORKS 
MINIDISK +: W MANUAL & SUBROUTINE INDEX $89.00 
(EPROMS INCLUDED. 2708a) 

MASTER CHARGE AND VISA ADD 3% 
25% DEPOSIT REQUIRED ON ALL COD'S 

CER-COMP MICROCOMPUTERS 

1000 N. NELLIS BLVD. 

LAS VEGAS, NEVADA 89110 

PH: 702-452-1277/452-0632 

HOURS: 10 AM. to 4 P.M. PST 
1 P.M. to 7 P.M. EST 
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Welcome to Percom's Wide World 




Each LFD mini-disk storage system 
includes: 

• drives with integral power 
supplies in an enamel-finished 
enclosure 

• a controller/interlace with ROM 
operating system plus extra ROM 
capacity 

• an interconnecting cable 

• a comprehensive 80-page users 
manual 



Low-Cost Mini-Disk Storage in the Size You Want. 

Hilt*!! til 

•mi mi l| 

IIP 



Percom LFD mim-disk dnve 
systems are supplied complete 
and ready to plug in the moment 
they arrive. You don t even have 
to buy extra memory, Moreover, 
software support ranges from 
assembly language program 
development aids to high-speed 
disk operating systems and 
business application programs. 

Mini-disk storage system prices: 



The LFD-400 1- and -400EX^ systems 

and the LFD 80Q'* and -800EX • systems 
are available In 1*. 2* and 3*dnlve 
configurations Trie -400 400EX drives 
store 102K bytes of formatted data on 
40 Iracfc disks, and data may be stored on 
either surface of a disk. The -800. -800 EX 
drives store 200K bytes of formatted data 
on 77-lrack disks 

The LFD-lOW systems (r*ol pictured) 
have dual-drive unils wtiicn store 800K 
bytes on-line. The LFIM00O T * controller 
accommodates two drive systems so that 
a user may have as much as 1 6M b tes 
on-line. 





1-DRIVE 


2-ORIVE 


3-ORfVE 


MODEL 


SYSTEM 


SYSTEM 


SYSTEM 


For the SS-50 Bus 








LFD-400 " 


S 599 95 


$ 999.95 


$1399 95 


LFD-800- 


895 95 


154995 


2195 95 


R* the EXORciser * Bus 








LFD400EX- 


$ 649 95 


$1049 95 


$1449.95 


LFO-800EX'- 


945.95 


1599 95 


224595 


LFO-1000- 


(dual) 3t495 00 


(quad) $4950.00 


— 





EXORciser BuslfO*400EX." 400EX » Systems 




Upgrade to 6809 Computing Power Only $69.95 



Although designed with ihe SWT? 6800 owner tn 
mind, this upgrade adapter may also be used wtih 
most olher 6600 and 6802 MRUs The adapter Is 
supplied assembled and tested, and includes Ihe 
6809 IC. a crystal other essential components and 
user rnslructlons Restore your original system by 
merely unplugging the adapter ana a wire-Jumpered 



DtP header, and re-inserting the original 
components Also available tor your upgiaded 
system is PSYMON 1 * (ftrcom SYstem MONrtor), 
the operating syslem lor th* Ftycom 6809 
ssrnile-boafd computer PSYMOtf* on2716flOM 
costs only $69 95. On diskette (source and object 
Hies), only $29 95 



Data Terminal & Two-Cassette 
Interface — the CIS-30+ 




• interlace to data term mat and two cassette recovers 
win a unit only 1 10 foe size J SWTP's AC 30 

• Select 30. 60 or 120 frries per second casseto 
interfacing: 300, GOO or 1200 baud data terminal 
Interfacing 

• Optional mod kits make CIS-30+ work with any 
mc/xwrnputer (For MlTS 680t ask for Teen Memo 
TWDS-30f-09) 

• KC SianoardOi Phase M (double Irequeitcy) casseJte 
data encoding Dependable sell clocking opeialkon 

• Ordinary lunctfonj may be accomplished witn 6800 
Mrkoug* monitor 

Prteea: Kil, S79 95, Assembled. $9995 Prices include 
a comprehend* mslnjdlon manual Also available Tesi 
Cassette, Remote Control KH (tor program control ol 
recorders). »C Soctei Kit. MlTS 680b mod doofnefltafcoo 
and Universal Adapter Kil {conveik CIS 30+ for use m\U 
any wmpuler) 



of 6800 Microcomputing. 



6800/6809 SOFTWARE 
System Software 

6800 Symbolic Assembler Specify assembly options 
at lime ol assembly wHh this symbolic assembler Source 
fistmg on diskette S299S 

Super BASIC - a 12K extended random access disk BASIC 
lor the 6800 and 6909 Supports 44 commands and 31 func- 
tions Interprets programs written m botti SMTP flK BASIC 
(visions 20, 22 & 2.3) and Super BASIC Features 9*dig<t 
BCD arithmetic. Pnnl Using and Llnpul commands, and rmjdh 
more Price $49.95 

TOUCHUP < Modifies TSC's Tert Edtor and Text Pro- 
cessor tor Percom minidisk drive operalwn Supplied on 
diskette complete with source listing 517 95 

Operating Systems 

INDE**" — This easylo-use di k-operalino, and Ale man- 
agement system ior 6900 microcomputers Is test VO devices 
areserviced by mlenupl request. iNOtX' - accesses periptierals 
the same as disk files - new devices may be added without 
changing Ihe operating sy tern Other features unlimited 
number ol 00 S tomrronds may be added* over 60 system 
enliy points • display only those files at or above user* speed led 
file acltvlly level ♦ versions available for SMTP MF-66, Smoke s 
BFD-68 and Motorola's EXORciser* Price . $99 95 
MINTDOS-PLUSX* - An extension ot the oiigmal 
MINI0DS" lor LfO-400" m.n«-dtsk systems, MINJD0S- 
PLUS)C* manipulates Hies oy sx-chaiader names Supports 
up to 31 files Resident commands Include Inrllahie. Save, 
Allocate, Load, Flies (directory list . Rename and Delete 
Supplied on 2708 ROM with a mm diskette that Includes 
transient uhlllies nuchas Copy, Backup, Create, Pack and Pnnl 
Directory Price $34 95 

PSYMON* Percom SYstem MONIIcr tor ihe Percom 
slng^t»aJcVSS-5CM>^-compaiible 6909 compuier accoro- 
mo^ates user's application programs wiin any mixol pariplwr- 
als without modifying programs PSYMOM * also features 
character echoing fo devices other I tan the communicating 
devi » sophisticated register and memory dump routines and 
more. Price (on 2716 ROM) $69.95 

WlNDEX** — Oescrlbed in detail elsewhere on tills page. 
Business Programs 

General Ledger — For 6B00/6BC9 computers using Per 
com LFO mini disk storage systems Requires Mte or no 
knowledge ol bookkeeping because He operator is prompted 
with non technical questions during data entry General Ledger 
updates account balances immediately — In real lime, and will 
or int financial statements immedialeiy attei journal entries. User 
selects and assigns own account numbers, tailois financial 
stalemenls to firm's particular needs Provides audit trail Huns 
under Percom Super BASIC Requues 24K bytes ot HAM 
Supplied on minidiskette with a comprehensive users mauuai 
Price $199-95. 

FINDER ^ — This general purpose dria base manager Is 
written In Percom Super BASIC Works will 6B0O/6809 com- 
puters using Percom LFO-400 1 * minidisk drive storage sys- 
tems FINDER" aliows user to define and access records using 
his own terminology customize file structures to spectlic 
ne s Basic commands are New, Change, Delete. Find and 
Pack Add up lo three user-detined commands FINDER plus 
Super BASIC require 24X bylesol RAM Suckled on minidisk- 
elte with a users manuaL Price $99 95 

Mailing List Processor Powerlul search, sort, create 
and update capability plus ability lo store 700 addresses per 
minidi ketle make Ihis lisl processor elficleni and easy lo use. 
Huns under Percom Super BASIC Requires 24K bytes ot RAM 
Supplied on minidiskette with a users manual Price $99 95 
From the Software Works 
Devetoqmenland debugging programs for 6600 »Cs on disk- 
ette 

Disassembler/ Source Generator $30.95 

Reiocing Oisas'mblr/ Segmented Text Gen , , $4095 

Disassemble!/ Trace $2595 

Support Relocatof Program $25 95 

Relocating Assam Weramking Loader $55 95 

Sm.|hBUG"{27l6EPROM) $7000 



^-Price Special on Hemenway Software! 

CP/684 disk operating systBT I 4997 

STFUBAU X compiler $124 97 

£DlT68lext editor $ 1997 

MACRO-flelocating Assembler $ 39 97 

Lmkage Editor (LNKEDT66) $ 24 97 

Cross Reference uliiity . $ 14.97 

^llodernam of fVyic*TJ Oate COmfwAy, inc 
* kafemsrt ol MolortXa Cc^oratoon 
:l>Ad«marfc ol Homopwray AftwesK* Company 
"SrmihBUG |»« iradamarV <* mo Software woto Company 



And looking into' is lust what 
you do with the Electnc 
Window"* as you peer right 
into memory space where 
characters are being input 
and manipulated. Display 
is memory-resident, 
programmable and generates 
up to 24 80-character lines. 
Other features include 

• standard character 
generator plus provision for 
optional special character 
generator 

• dual intensity, high-hghting 
alphanumeric display 

• scrolling by a programmable 
register • programmable 
display positioning 

• programmable interlaced or 
noninterlaced scan 

• descenders on lower case 
letters • users manual with 
application instructions and 
listing of WINDEX* driver, 




The Electric Window. 1 * 
Worth Looking Into. $249.95 

WINDEX u is a fast video display driver program (or 
the Electric Window™ . WINDEX'* atso features: 
program and keyboard control ot character 
generators • displayabie control characters — under 
program control ■ automatic scrolling - a driver 
routine (or the parallel input keyboard feature of the 
Percom 6809 Single-Board Computer, the SBC/9^* 
• auto Ifnking to PSYMON' - the ROM operating 
system for the SBC/9 lM ■ Prices: ROM version 
$39 95; LFD*4O0 T * compatible diskette {source and 
object files) $29 95 



Now Available! the SBC/9 MPU/ Control Computer 

(Single-Board-Computer/6809) — stands alone as a control computer, but also 
compatible with the SS-50 bus for use as an MPU card. Includes PSYMON^ {Percom 
SYstem MONitor) in a 1K ROM and provides for additional 1K of ROM. Also includes 1K 
of RAM. Features: Super Port — provision for multi-address, 8-bit bidirectional data 
lines • an intelligent data bus for multi-level data bus decoding • an orvboard 110-baud 
to 19.2 kbaud clock generator • extended address capability — to 16 megabytes — 
without disabling baud clock or adding hardware. And much more, Supplied with 
PSYMON® and comprehensive users manual. Price w $199.95, 

See lull page ad elsewhere lo this magazine fcx all ot the SBC/9 features, 



Full Feature Prototyping PC Boards 



All ol the features needed lor rapid, 
straighlfoiward circuit prototyping. Use 
14- 16-. 24- and 40-pin DIP sockets 
• SS-50 bus card accommodates 34 and 
50-pm ribbon connectors on top edge, 
10 pm Molex connector on side edge - I/O 
card accommodates 34 pm ribbon 
connector and 12-pin Molex on lop edge 



I/O Bus Card: $14.95 





♦ VO card is 1-K inches higher man 
SWTP I/O card • mlerdigllaled power 
conductors* contacts for power regulator* 
and distributed capacitance bypassing 

• use wire wrap, wiring pencil or solder 
wiring • tin-lead plating over 2-oz copper 
conductors wets quickly, solders easily 

♦ FR4-G10 epoxy-glass substrate 



SS-50 Bus Card: $24.95 



To place an order or request additional literature call toll- 
free 1-800*527-1692. For technical information call (214) 
272-3421 . Orders may be paid by check, money order , COD or 
charged to a VISA or Master Charge account Texas residents 
must add 5% sales tax, 

PRICES AND SPEQFICAt IONS SUBJECT TO CHANG* WITHOUT NOTTCt 




PfiRCOM DATA COMPANY. INC 

211 N KlfWY GAPLAMQ rtXA5 7&042 
<2U) 2*2 342? 



CRUNCHERS CORNER 

TNs monthly column is intended to provide a place for the 
exchange of ideas on microcomputer arithmetic. A systematic 
exposition of fixed and floating point arithmetic* hardware and 
software, algorithms for approximation and so on is planned. 
Questions and comments submitted to this column can be on any 
subject relevant to "number crunching," and should be addressed 
to: 

Jack Biyant 

Oepartment of Mathematics 
Texas A&M University 
College Station. Texas 77343 

We ask that all corespondents supply their names and addresses. 
ALGEBRAIC TO POLISH EXPRESSION TRANSLATION 



In the first five lnuti of '68' Micro 
Journal, we studied 16 bit two's complement 
arithmetic. The last Installment of this 
(In July CRUNCHER'S CORNER) featured a com- 
plete Integer arithmetic package* In addi- 
tion to the expected arithmetic functions, 
expression evaluation was provided. The 
expressions were to be entered (or other- 
wise transferred to the expression buffer) 
1n reverse Polish notation. This method of 
expression evaluation 1s most convenient 
for hand entry. For example, Instead of 
(A-B)/C", one enters AB-C/. 

In this month's column, we give a simple 
program to translate from algebraic nota- 
tion to Polish. Instead of the usual pro- 
grams In 6900 assembly language which have 
mppmmrmd here, we give the algorithm 1n two 
dialects of BASIC. I think this will be of 
more Interest » especially since the trans- 
lator Itself ts not all which Is required 
to use these Ideas In a high level lan- 
guage. (In particular, the translator does 
no error checking. That 1s. It 1s assumed 
that the expression Is without errors. >* 



The Algorithm 



The algorithm Itself 1s s 
purpose of Illustration,, 
to consider the simple c 
four binary operators ♦ 
used, and 1n which the op 
alphabetic characters A, 
and left parentheses are a 
course, but they serve 
purpose In algebraic expr 
main purpose Is to alter 
archy 1n algebraic notatlo 
fore ♦ and -, otherwise 1e 
translation requires ass 
each, as follows: 



Imple. for the 
1t Is sufficient 
ase In which the 
* and / are 
erands sre single 
Bt C, . . . Right 
lso operators, of 
a much different 
esstons. Their 
the tmplled hler- 
ni * and / be- 
ft-to-Mght. The 
Ignlng ranks to 



Operator / Operand Rank 



null 
A-Z 

( 
) 

* / 



1 
-1 1 


t 


1 f 


2 t 


a i 


A i 
i 



The null rank Indicates the end of evi tui- 
tion. In the accompanying flowcharts and 
discussion, the following notation Is used: 

L,M — pointers to the expression 
— pointer to the opersnd stack 
H — s vector with H(L) the rank of the 

expression at L 
— the operand stack hierarchy 

Scan the expression left to right 
and form H. This also furnishes 
L, one plus the number of opera- 
tors and operands. 



Step 1 



Step 2. 



Initialise M 
and 0( 1 ) - -1. 



1,0-2. H(L> * 



Step 3. 



Step A. 



If H(L) - 0» we have an operand: 
place It on the Polish stack and 
Increment H ; else If H( L ) - 2, 
we have a right parentheslsi de- 
crement and Increment H ; 
else place the operator on the op- 
erator stack, Increment and H 
and repeat Step 3. 

Examine the proceeding rank 
0(0-1) i If It 1s less than the 
current operand hierarchy, place 
It on the Polish expression stack, 
decrement and repeat Step 4* 
else if Mp L , exit to Step 5. 
else repeat Step 3. 

Fancy BASIC Program 

The algorithm Is coded In a rather nice 
version** of BASIC In the first listing. 

Plain BASIC Program 

The next listing fs for a much older ver- 
sion* of BASIC (although the string han- 
dling may be slightly more convenient for 
this problem). It requires that strings be 
dimensioned by the maximum length, does not 
support If ... then *•* else or multiple 
statements pmr 1 tne; but It does have a 
nice 'position* function. Shown after the 



It Is possible that this checking could 
have been performed by another program. 
For exsmple, a BASIC compiler could easi- 
ly be supposed to be accompanied by a 
BASIC Interpreter which detects errors In 
syntax and even program logic. It Is, of 
course, much easier to write a compiler 
under the assumption that the source pro- 
gram being compiled contains no syntactic 
errors. 



»TRS-80 (TM) Level 
Is essentlslly s 
Microsoft <TM) 1n 
lects of BASIC. 
This version Is t 
If your Interest 
grammtng which 1 
sent 1*1 1y Imposs 
(TM) 9830 BASIC, 
the 9930 hardware 
ter and keyboard 
duplicated even s 



II BASICi I believe It 
tmllar to other recent 
spired (or written) dta- 

he famous (or Infamous* 
Is In structured pro- 
n this language Is es~ 
1b1e) Hewlett-Packard 
But I am too critical: 
• particularly the plot- 
layout, are not easily 
1x years later. 
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listing irt several sample runs of the 
program. 



I suppose 
to consld 
detection 
of courst 
crunching 
column. 
Important 
Instead, 
track: f 



What 'a Next? 

the logical thing to do next 1s 

•r parting. Including the trror 

problem for expressions. That, 

haa even loss to do with number 

than tha topic of thla month's 

Although ft 1a an Intaraatfng and 

dlvaralon, wt will not puriut It. 

next month wa gat back on tha main 

loatfng point arithmatfcl 



(jtjrt) 



INITIALIZE 

POINTERS* 
RPMK VECTORS* 
pPCRRTpR flNO 
POLISH STACK 




f 5TBHT HT 
LETT CF 
INPUT STRIKE 

WHO htm 




0CCRCHCKT 

pointer tn 

OPCRRTOR 
STACK TO SKIP 
C{]fl RESPONDING 

I.CTT l»IW 



I" 



PLACE OPERWfQR 



UPOfiTE POINTERS 



5EI i* 


BTOMt OF 


top or 


[]Pl RFT3« 


stfl« 


15 RT 


LEAST 


THAT AT 


NEST 1 


H STRING 




| CONTINUE SCR* 

— i — i 



(stop) 



v m cliii loan rot stilus] aid str u? rrtiij, 

tO CLIll 21*1 Oiriil 4-lS Ulfl nuil.Jjrii, jK'mi 

JO 1IR XflTlllIH VICTOM, 

19 POI t ■ 1 TO 4*1 M C 1 1 >0r O(I|*0i llir I| p|-**t L-0 

40 IltlT MLCIIIli: STIIlE'tJt 

• 5 III TtIS toor 4)0 00) tiriltl i 
« i.-t* is il*Rioi<si,L P n 

*0 IP ••-- f ■ rn« MLflt soto SO] IL5I 

ir if — )■ Till *tt}*ii SOTO *9i IL1E 
ir «•*♦* 01 *!■■-■ tut* ifL|-3t *>f> 5J iILSE 
IP *»•"•■ 01 IMV" TIM K[L)>ti GJrJ 10 III*! 
IP »!■■• rill 70 ILSE Wft]*0s GOTO 5 3 
70 l(L)>0l D|1j"-lt H*tt J-2 

". lit stir 1 

tO IP B(M*0 T«M 90 tLSt 

It M(L»-2 till J-J-l: t»t»tt a fj OJ; US I 

OtU)*fltQt(*tt J/Ul 0<Jt-l(l)t «■•■!; IO«lj 20?3 BJ 
90 M-P$*lt&§(Sl«l«l1 » t-t»1 
94 IfR 001 ITtr ». 

100 If (J- «} >-ftlJII MIV Pl-rl»q*tJ-U; l»J-1t iOTQ 100$ tLSC 
ir 8>-L TVtt Ptrtr "POLISH irtltE"> - : rl : oqiq U; ilsk 02 



A NOTE ABOUT THE FLOW CHARTS 

Flow charta aaan In thla and aarllar 
columna wara praparad using an Inter- 
active microcomputer flow chart draw- 
ing program developed by the author 
at Texaa A&M Onlveralty with NASA 
support. The useful Inaaa of flow 
charta la eaay to question, especial- 
ly when a multi-page aet of flow 
charta 1s needed to deacrlbe an al- 
gorithm. Thata where the program en- 
ters; 1t puts aa much on a page aa 
will fit, takea care of all the cen- 
tering chorea, and so on. With a lot 
on a page and several levels possi- 
ble, the main danger of flow charta 
(that they tend to encourage bottom- 
up rather than top-down programming) 
vanishes, and they < the flow charta 
produced) become a very useful tool. 
In any case, they furnish a good ex- 
ample of one perhapa unexpected ap- 
plication of microprocessors to a 
usually tedious drafting and layout 
planning chore. 



9 IN Sit64Ji0*C64]»PI[<54 1»Hlt«J»0I[«4).F»C9J«AiCU 
FOR 1*1 TO 64 
MC [ )-OC [ >-» 

. 0*1 1 J-" 
53 PtI I >' - 
(9 NEXT I 
79 ft--<>«- '** 

99 DISP -AtCEBRAJC STRING* I 
109 1HPUT St 

ue disp 

120 PRINT "ALGEBRAIC SIRINGi *I&* 

139 LI-LEH<St> 

149 L»L«-l 

159 IF L LI THEN 299 

169 Rt-Sttl.U 

179 GOTO POStFt.Ait »»JJ OF 200. 220.249.£4©i26O.260 

199 H£L>9 

190 COTO 149 

299 KU-i 
219 COTO 140 
229 rtCL 1-2 
239 COTO 149 
249 xlLl-3 

259 COTO 14« 

260 Hit 3-4 
270 GOTO 149 
260 NIL 3-0 
290 0111—1 

300 M-K.1 
310 J*2 

320 IF NIN>0 THEN 420 

330 IF Hl«3»2 THEN 390 

340 Of JJ-NtN) 

350 Oil J.Jla$tCHif1) 

360 J*J*l 

370 f1-M*l 

390 COTO 320 

3$0 jbj-; 

409 M»rt«-l 

410 GOTO 459 

429 PtCK.*]-6ttM»nj 

439 n-n-i 

449 *■**! 

459 IF 0IJ-13 ■ Knj TKH 409 

46 IF K >- L THCH 520 



470 goto m 




460 PtCkiiK J-Oil j-i 


.J-ll 


499 K«^#l 




590 J»J-J 




510 0T0 450 




529 P*Ik*n**" 




539 PRINT -P0LI8N 


STRJNC — > 


540 PRINT 




990 GOTO 20 




ALGEBRAIC STRING! 


H>S 


POLISH STRING — > 


A$* 


ALGEBRAIC STRIhGI 


A*S».^»XJ 


P0LISN STRING --> 


A$ZK»«- 



NLGE9RAIC STRINQi 
POLISH STRING —> 



ALGE9RAIC STRING) 
POLISH STRIN •-> 



ALGEBRAIC 9TRIHG1 
P0L1SN STRJNC — > 



ALGEBRAIC STRINQi 
POtISM STRING — > 



<<<»< <<<<CR>>>>>3>»> 



A»B»<$»£«<F»C*iH+j«K>>) 



/f<c.A-B>-C>-I»-E>-F>-C 
RB-C-3-E-P-C- 



A-0-t-D-E-F-C 
AB-C-D-E-F-C- 
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BASIC STRING EDITOR 



Dr. E. M. Pass 
1454 Latta Ln. 
Conyaro, GA 30207 



Recently I had the necaaaity of convarting ■ ayaten coapoaed 
Of aeverel lengthy BASIC prolnai to do ■ aiailar Job. The pri- 
aary change a involved converting file aaaea and literal atrlnta 
froa thoae uaed in (be old era tea to thooe uaed in tbe new. Since 
the BASIC thai I uaa (USI 12K DISK BASIC) eeborfiea e 1 Ino^orienfced 
editor and b»a * non-tranipareni diek tor»t for programs, the 
problea v»a oo«~tr ivial. After aeveral atteapta, I developed tbe 
procra" Hated below. 

Tbe program which [ call SCAVWIR realdaa in tb«> Ia\et„ portion 

of KIKBUG ecretchpad mciory, which la one of the few nreaa of 

aeaory wblcb BASIC doea not «ae. To uee it. one abould firot load 

BASIC, then the BASIC prograa to be changed To eacaP* fro» BASIC, 

the uaer aay type PATCH. 3CAPMZA abould not be loaded directly 

in place fro* diak but aay be loaded from tape or ln a dkfJerent 

area of aeaory and then relocated. Tble la bee a uee aoaa DOS fume* 

tlone uee the- ease portion of acretebpad ror a tack and temporary 

etomfle and tbie would daatroy 9CAJdSH. Than, ueing IftKBMC or 

SWTDUCr the uaer aay enter the following data; 

A002-3 atarting address for aaarch (0100) 

A0<H~9 ending tddreae for aaarch (7F00) 

A 00 8 string length 

A0I6... original etrlng 

A028, , . ne* atring 

If uaing SWTBIAC. all that la neceaatry then ta to type 

J AC4A 

to execute tbe prograa, wait for tbe S to be printed, and type 

C 

or 

J 0103 

to return lo JtfBlC. Jf uaini MIXBI/G, It will be ndcoaatry lo type 

M A0«8 
and place AOaA In aeaory locations A04R and A049 , type 


to execute tho prograa, wait for the * to be printed, type 

H A048 
again and place 0103 in aeaory Location a A048 and A049, then type 

C 
to return to BASIC. 

At thia point, the etrlng will be changed. If other atringa 
were required to be changed, tbey aay be changed before returning 
to BASIC by repeating tbe changes to A0M, A018 - A023 r and 1026 - 
A033 and executing tbe prograa for each case. The boundaries for 
the aearch are aoaewha t generoua at 0100 to 7FO0» but will work. 
The priaary danger when ualng thla prograa lg io incorrectly natch- 
lag and aedifylng • triage id tbe BASIC prograa or io the BASIC 
interpreter ltaelf. Better search bouodartae would aolee the second 
problea, but only intelligent searching will nolve the. first problem. 

Thla routine nay alao be uaed to acidify arbitrary alrlnga ln 
aeaory regardleaa of whether BASIC la loadtd or not In this cane 
tbe search bounder lea abould be oet as follows: 



A002 - 3 
A004 - 5 



starting addreaa 

ending addreaa - atrlng length 



A Hating of the prograa and a ample execution follow 



ti M82 

■R0Q2 91 

• R083 90 

• R064 UJ 

• **3 FF 

•R906 04 

•n R816 
*Wi< 13 

• M17 14 

• R618 13 

10 



• R0l9 16 

• ROlA 1? 

4 

•11 R026 

•R©26 38 

■ R028 32 

• R02* 33 
•R02R 34 
•R026 33 



*R 8188 

• 8i8a ia 

•8191 14 
*8182 13 
•0193 1* 
■9184 1? 
•8183 18 

• 8186 13 
•8187 14 



• M 8848 
•A848 RO 

*R8*9 «R 



•♦1 6188 
•8189 38 

• 8191 31 
•61*2 32 

• 6183 33 
«9l§4 1? 

• 0183 18 
■8186 13 
•8187 14 



9 9018 






Hflh SCRWIR 


99913 






OPT 


69029 A64A 






0*0 *R04R 


899 8 A94* 


FE R082 


STRR1 


L0H SR002 


60949 R040 


20 64 




WW OVER 


69030 R04F 
00O69 R632 


FE ROOO 


BACK 


tOX *R006 


00 




INK 


99979 R8SJ 


9C RB04 


0V6R 


CRX SRQ04 


6 0089 R936 
9 9090 A036 


24 03 




ONE C0NT 


7E E900 




JRP 1E800 


90100 A036 


FF ROOO 


coin 


SIM SRQ08 


66116 A03E 


f » R906 




L0A *R906 


86128 ft 661 


9€ R813 




LOS MR013 


69130 R064 


32 


FIND 


PUW R 


6 6140 *9*3 


Rl 00 




CtlR R « 


QQilO R86? 


24 U 




ONE 0RCK 


6 014 a fl06? 


00 




1MH 


UK! ass 


3A 
2% F7 




0EC & 

0HE FIND 


6 9139 ROStt 


FE flOOO 




L0H SR008 


48298 HOTVS 


** R00* 




L&A 6 SR006 


9 8216 A973 


s|C RO^i 




LOS •*RG23 


9 8228 ROT* 


32 


fU 


POL R 


99239 R8 7 


07 60 




STR R X 


90249 ROTS 


00 




1MH 


99239 R97R 


3* 




DEC O 


992*0 R976 


26 *9 




ONE FIX 


9 927Q R07U 


7E 09-^F 




JNP 9ACK 


68280 




* 




68290 




> R002-3 * STRFT RDBRESS 


9939Q 




* R904-3 - Ef€> R06*E$S - L&lttttH « 1 


99310 




• R004 • LSMG1M OF STRING 


ri-322i3 




• R916 ■ ORlGlTtRL STRltK 


90339 




• R926 • NEk STRING 


90340 




* 




|#3M 






END 



101*VL ERRORS 0OM3O 

TINY BASIC RENUMBER «« wiSft. 

Honolulu, Hswaii 96d22 

* * REWU?!BER YOUR * * 
* * TINY BA8IC TCOT EDITOR * * 

A TINY-BASIC, SUCH AS TOM PITMAN'S, 
HAS CAPABILITIES AS A TEXT EDITOR, FOR 
TWO GOOD REASONS. 

FIRffr, IT DOES NOT CHECK SYNTAX 
UNTIL A LINE IS EXECUTED. THIS MEANS 
THAT YOU CAN WRITE SOMEONE A LtHTER IN 
PLAIN LANGUAGE INTO TINY BASIC, AND BASIC 
WILL ACCEPT IT. 

SECOND, BASIC OF COURSE PERMITS THE 
MAIN FEATURES OF TEXT EDITING, BY 
PERMUTING REP1ACEMENT OF LINES, AND 
INSERTING OF LINES BCTVEEJ? PREVIOUSLY 
NUMBERED LINES. 

THERE ARE TWO REMAINING STEPS THAT 
WOULD BE NICE FOR USING TINY AS A SMART 
LCITER-PROCESSOR. THE FIRST IS A COMMAND 
TO LIST WITHOUT LINE-NUMBERS. I HAVE 
WRITrEN MACHINE-LANCUAGE PROGRAMS, AND 
EVEN TINY-BASIC PROGRAMS , TO DO THIS. 
BUT THAT IS NOT THE SUBJECT OF THIS 
ARTICLE. 

1HE SECOND ENHANCEMENT, WHICH IS THE 
SUBJECT OF THE FOLLOWING, IS RENUMBER. 
IT WOULD BE NICE TO TEACH THE MACHINE TO 
RENUMBER YOUR TEXT IN TINY-BASIC, TO 
PERMIT INSERTING MORE TEXT IN THE 
MIDDLE. 

RENUMBERING A BASIC PROGRAM INVOLVES 
TWO STEPS. THE FIROT IS CHANGING ALL THE 
LINE ITUMBERS, AND THE SECOND IS LOOKING 
UP ALL THE COTO AND GOSUB INSTRUCTIONS, 
BOTH BEFORE AND AFTER THE LINE NUMBERS 
ARE CHANGED, AND CHANGING THE PARAMETERS 
OF THE THE GOTO STATEMENTS TO POINT TO 
THE NEW LINE NUMBERS. 

BUT IF WE ARE JUST WRITING SOMEONE A 
LETTER, AND DONT PLAN TO EXECUTE THE 
CODE, THE SECOND REQUREIMENT DOESN'T 
EXIST. YOU CAN SCREAM THRU, CHANGINC THE 
LINE NUMBERS TO ANY PATrERN, WITHOUT ANY 
DIRE CONSEQUENCES. 
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HERE'S HOW TO RENUMBER THE LINES: 

CE 11 LDX #11 : FIRST NEW LINE * 
FK 66D2 STX O0B2 : IN TINY VARIABLE Y 
CE #O0B8 LDX #00B8 : START OF TINY PRCM. 
FF 00B4 8TX 00B4 i SAVE IN TINY Z 

I LOOPBACK POINT 
FE 00B4 LDX 00B4 i LIRE NUMBER ADDX 
EE 00 LDX 00 ,X t LINE NUMBER 



26 01 
39 



BNE AHEAD : LINE * * ? 
RTS : YES, DONE. RETURN 



4F 


CLR A : ' 


C6 08 


LDAB *0A 


DB B3 


ADDB 83 


99 B2 


ADCA B2 


97 B2 


STAA fl2 


D7 B3 


STAB B3 


28 04 


BRA : TO 



FE O0B4 LDX : ADDX AGAIN 

96 B2 LDAA : HI BITS OF NEW LINE " 

A7 00 STAA f X : INTO PLACE. 

96 B3 LDAA : LOB ITS ALSO 

A7 01 STAA 01 ,X 

08 I NX : PASS OVER LINE NUMBER 

J CO ON TO NEXT TINY LINE 

08 I NX : PASS OVER CHARACTER 

A6 00 LDAA 00, X : IS THIS CHARACrER 

81 OD CMPA *0D : - A RETURN? 

26 F9 BNE : NO, KEEP CHUCCINC THRU 

08 I NX : YES. PASS OVER CR. 

FF 00B4 STX 00B4 : POINTER TO NEXT LINE 



BY TEN. 
ADD LOWBITS. 
AND HIDITS. 
SI ORE NEXr LINE 
NUMBER IN TINY Y. 
TO LOOPBACK POINT. 



THE ABOVE RELOCATABLE CODE CAN CO 
ANYVHER£ THAT WON'T DISTURB TINY. THERE 
IS PROBABLY SPACE W)VN A WAYS FROM THE 
TOP OF MEMORY THAT TINY USES. 

THE CODE ASSUMES, IN THE THIRD LINE, 
THAT YOUR BASIC PROCRAM STARTS AT 00B8. 
MAYBE YOURS STARTS SOMEWHERE ELSE. 

THE FIRST LINE SETS THE INITIAL 

VALUE FOR RENUMBERED LINES AT 17 (HEX 

11). I RENUMBER FROM 17 BY TENS TO 

RIttlIND ME AT A CLANCE WHICH NUMBERS ARE 

RENUMBERED AS I CONTINUE TO EDIT. 

YOU CAN CALL THIS SUBROUTINE FROM 
YOUR MONITOR, OR FROM TINY WITH THE 
IMMEDIATE CALL X-USR(NNNN), WHERE NNNN IS 
THE DECIMAL LOCATION OF THIS CODE. 

YOU WILL FIND THE BASIC LINE NUMBERS 
INSTANTLY RENUMBERED. 

AND EVEN IF THE BASIC WAS A PROCRAM, 
WITH GOTO AND GOSUB PROBLEMS, ITS EASIER 
TO SUBSEQUENTLY RENUMBER THE JUMPS THAN 
TO RETYPE THE WHOLE PROCRAM WHEN YOU NEED 
TO INSERT MORE STATEMENTS. 

HELP 

Has anyone interfaced the SMTP MF-68 
disk to the Motorola MEK6800 0-2 using 
the MEK 6800AR motherboard? I'd like 
to know of any problems and about 
system compatibility. 
Wendell Anderson, 2210 Blue Berry Hill, 
San Antonio, TX 78232 



SWTPCDMAF2 DISK SYSTEM 

REVIEW 

As many of you realize, 68 Micro Journal" has 
grown rapidly since our first Issue, of February 
this year. We es e computer magazine, unlike 
most of the other computer magazines, use 
computers, 6600 end 6809 , to do most el I our text 
editing, composition end copy output. All 
accomplished with standard 6800 end 6809 
computers, Just like those you our feeders own 
end use. Me even have our major accounting date 
processing done by 6800 end 6809 computers. In 
addition to tne above we malnteln e complete date 
file, of ell our subscribers, advertisers end 
authors, on 6800 end 6809 computers, egetn Just 
like yours. In all we have nine 6800 end/or 6809 
computers In our system, working computers that 
Is, all major makes (except 1wo, SSB and MSI), 
these we hope 1o add to our staff soon. Right; 
'staff each one has e name, given by various 
human staff members. They ell work, there ere no 
'bugs' or 'funny happenings' In any of our TTL 
staff. I read the laments of other computer 
magazine steff writers end publishers, using 
mostly S100 bus machlnesC?) or e gaggle of those 
expensive toys of different gender, mlsnomered es 
computers i then I look around et el I the 6800 end 
6809 machines we use dally end get e pretty 
satisfied feel Ing. 

All this may seem Inepproprlate to the theme of 
this review, except for the feet that the SWTPC 
DMAF2 Floppy Disk System helps us do our work 
even better. At least It makes It e lot easier. 

The only problem we have experienced with using 
the same computers that are advertised In 68 
Micro Journal 1 ", was the need for more mass 
storage. Especially our Inhouse subscriber list 
(our mailers have the subscriber list also, et 
least each has a part of It). When one of you 
cell concerning your subscription, almost always 
we can have one of our computers scan for your 
file end get the problem settled, while you ere 
still on the phone. Try that with one of the 
other magezlnesl I did e couple years back, 
seems they kept charging my Master Charge every 
month for e 3 year subscription. After It zoomed 
pest the $100+ mark I started calling; my letters 
went unanswered. Not once In 4 eel Is could they 
get It straight, the story was always the same, 
will 'try* to get It out of the computer end let 
you know. Fl nelly after e person -to- per son call 
to the lady asslstent of the publisher, did I get 
It strelght. Even then they were not sure. I 
was asked, M wel I how much have we overcharged 
you* 1 ? I was even e slight bit hazy by this time 
(6 weeks of calling), I replied, "oh, something 
over a hundred dollars, around e hundred and 
twenty-seven I believe". I received e check for 
exactly S127.00 e week or so later. I got out 
all my back Master Charge billings end ran en 
accurate total, not Including ell the long 
distance calls, It came to $132.50. I don't 
think they ever did get It straight on their end, 
computer etways down, or something like that. 
Many times es we use our computers to slralghten 
out misunderstandings (yes, we have them also, 
only difference Is we get strelght answers from 
our computers) I think back on that episode and 
feel sorry for all those trying to do serious 
work with toys rather then tools. 

The SWTPC DMAF2 Floppy Disk System makes any 
6800/09 computer system e tool, In the exact 
sense of the word. As I have said, el t ours 
worked, we just needed more mass storage. For 
Instance; We use a 6809 machine (SWTPC) to 
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maintain all the data files described above. Up 
until a few weeks back we were restricted to 8** 
double sided floppy disk, single density* This 
prevented us from maintaining all these files on 
one disk (with two backups current at all times). 
When we desired to run down a name or address or 
some other Item on disk, we had to open and close 
various data files and change disk, each time* 
That got to be a pain* We needed more contiguous 
mass storage. 

Since converting over to the new SWTPC DMAF2 dual 
density system, we have each file category on one 
disk* In fact It gives us approximately one and 
a quarter million bytes of actual data storage, 
per disk. So counting both drives we have 
approximately 2.5 megabytes on line at all times. 

The SWTPC DMAF2 dual density disk system uses the 
Qume 8" double sided disk drives* It may be 
operated In either single or double density mode. 
It will transfer data from a single density to a 
double density disk or vice-versa. The 
controller looks at the disk formatting and 
determines If It Is double or single density. 
Based on this determination It configures Itself 
to read or write In the proper mode. It Is all 
automatic and requires no operator Intervention. 
The only time the operator must tel I It about 
single or double density Is when a FLEX" 
'NEWDISK' operation Is done. It formats each 
disk either single or double, depending on the 
needs of the operator. Some disk (backups) we 
'NEVKDISK' are single density, this way our 6600 
systems can use them also, for text type files. 
However, there Is one kink when using text files 
from one system to the othen 

The older SWTPC 0MAF1 system uses the WO 1771 
disk LSI controller IC. The DMAF2 system uses 
the WD 1791 LSI controller IC. The VG 1791 
cannot read disk created using the 1771. The 
1771 can read both format types (the 1771 writes 
00's In some gap areas, the 1791 writes IPs In 
these areas), the 1791 can read only disks 
formatted with IPs. This poses a problem for 
the user who has only the one disk system. It 
means that he must have a disk, already 
r newd(sked T by the 179 t to get his system up an 
running. He (or she) can then backup (6800) or 
copy (no backup command with 6809 Ft£X") to the 
new 1791 formatted disk, a systems disk or any 
other type disk desired. All recent 6800 
software from SWTPC and TSC Is formatted In the 
11 format, so both controllers can use the disk. 
Older disk from TSC (those we have beck beyond 
April 79) are of the 00 format and cannot be 
copied on the 0MAF2 system. 

Those upgrading from the 0MAF1 to the DMAF2 might 
have a problem unless they request a formatted 
disk from the vendor, when purchasing a seperate 
DMAF2 dual density controller board ($393.00). 
We could not bring our system up on the 6800 
because all our disks were formatted with the 
1771, the 1791 was having no part of that. We 
had an easy out; we merely newdlsked a disk on 
the 6809 machine (running a DMAF2) then copied 
our system (6800) disk onto the new disk while 
still running on the 6809 machine. Once we had a 
new system disk for the 6800, with gap recordings 
of )), we then went beck to the 6800 DMAF2 system 
and went from there. The 1771 was happy with the 
IPs. Of course If you are bringing up the 
system as a whole, there should be no problem as 
the disk you receive with the complete system has 
the 11 gap format. 

The DMAF2 double density disk system should work 
on any S50 bus computer. It (controller board) 



comes equipped so that It can be jumper 
programmed for the 2 mhz machines also. There 
are five different options, depending on machine 
speed and 1ype of memory Instal led. 6800 users 
should have 8K of memory located from $A00D thru 
S6FFF, for the disk operating system. Also a 
minimum of 12K of contiguous memory should be 
available In the 6800 machines, from 0~13t and 
20K In a 6809 machine. 

Two diagnostics are given, RE6TEST verifies that 
the controller registers are rspondlng properly. 
STEPTEST verifies the 1rack selection circuitry 
of the controller and the response of the disk 
drives. 

The SwrPC 0MAF2 system Is composed of four major 
units. The disk controller board Interfaces the 
computer to the disk drives. No component layout 
drawings, schematics or parts list are supplied. 
The board Is quite complex and requires some 
special equipment as we 1 1 as a good dual trace 
scope to align or troubleshoot. Field service Is 
not recommended by SWTPC. 

The FO-fl Motor Control board turns the disk off 
and on, by supplying a/c power to the drives, as 
determined by a timer on the controller board. 
This power Is optically coupled by two trlacs. 
This Isolates the system ground from the a/c 
power lines. 

The P-20 Power Supply Is a simple but adequate 7 
and 32 VAC source for the drives. Full wave 
rectifiers pass *5V dc and +24V dc to the drive 
logic boards. Power for the controller board Is 
supplied by the computer and onboard regulated. 

Pre-compensatlon Is accomplished by the 
controller board logic when double density mode 
Is used. Jumper selection Is available on the 
controller board to compensate for slow memory In 
the computer. This Is for those 6609 machines 
with slow memory enable lines. Jumpers are 
available for 1/0 addressing for either the 6800 
(32K) or the 6809 C56K). There are other options 
available on the board that are for future 
hardware upgrades. 

The Instructions contain Information on how to 
modify various memory boards for above 32K 
addressing. As this machine comes factory built 
there are not some of the more deta 1 1 ed 
Instructions, as Is found with most kits. The 
standard configuration Is two drives, however, 
the system can handle up to four drives, with 
existing software. 

We have been using our SWTPC dual density, dual 
disk system for over a month now and have 
experienced no problems whatsoever. It Is fast 
(appx. 4 times faster) than our 5" systems and 
now allows us to handle our long data files In a 
more efficient manner. 

Overall the SW1PC DMAF2 system appears Ideal for 
small (and some large) business or Industrial 
applications. It Is of rugged construction and 
uses quality components throughout. The entire 
system Is exhaust fan ducted and runs very cool. 
The fan makes very little noise and creates no 
distraction In our office* 



Additional Information can 
contacting: 



be secured 



by 



Southwest Technical Corporation 

219 W. Rhapsody 

San Antonio, Texas 78216 
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A 68 Micro Journal" Lab rating of AAA, 



Rating Scale: 
AAA - Excel lent 
AA - Good 

A - Fair (could be better but works) 
P - Poor (may not always work properly) 
X - Not recommended for children 
(or anything else) } 



SMALL BUSINESS ADVERTISING 

It has been noted that there are nony sroal I 6600 
businesses that can not substaln a prolonged 
advertising campaign. In order 1o assist these 
In establishing f name recognition 1 and at the 
same time let our readers know what they have to 
offer, we are starting, with the February r 80 
Issue, a 'BUSINESS CARD* advertising page. 

The plan works something like this; First we will 
place your ad, which will be a direct copy of 
your business card, on a special page with other 
'BUSINESS CARD 1 advertisers. The ad must be 
exactly as you submit your business card. We 
will not allow any changes unless you change your 
business card, then the new card copy will 
replace the existing card advertising. There 
will be a one time charge of S7.50 to "CHANGE" 
card copy, as Indicated above. 

It will be required that you pre-pay for 3 months 
of advertising, at the rate of $39.95 per nonth, 
for a total of $119.85. Payment In advance Is 
required. 

As Is our existing policy to protect our readers, 
the following requirement applies to this 1ype 
advertising, as all other advertising: 
AM advertisers taking advantage of this offer, 

must submit, for 
our review, any product that Is not nationally 

known or that we have 
not reviewed or used previously. Ads will not be 
accepted that do not Indicate a telephone number. 



subscription you will receive a total of 36 
Issues- This means that your final Issue will be 
dated one month later. In other words If you 
were supposed to expire In June 1980 (your 
subscription that Is), your expiration 
(subscription) will be the July Issue. 

This will enable us to have your 68 Micro 
Journal" to you prior 1o the cover dote. As of 
now, because of printing and mailing 
considerations, we are being delivered late In 
the month of cover date. This we hope to remedy 
as we have found no way 1o force the postal 
service to deliver your nagaztne, as they claim 
they will. We find that In some Instances It 
takes over three weeks for our own copy to be 
delivered to us, and we are right here where It 
Is being mailed. I know of many readers In Texas 
and other distant points who reel eve their 68 
Micro Journal" before we do. Even Including 
Canada and Mexico, In some Instances. 

If your Issues are being received late, contact 
your local postmaster and Inform him (or her) 
that 68 Micro Journal" Is mailed under 2d class 
postal rates. This means that the delivery Is 
"supposed" to be handled nearly as fast as 1st 
class and before all bulk or junk type moll. 

If you do not receive any consideration from your 
local postmaster than let me know by letter and I 
will turn It over to the proper postal 
department. Maybe we can get things speeded up, 
or at least get what we are all paying for. 
Remember; f The squeaking wheel gets greased 
first 1 I 



******* 



CLASSIFIED ADVERTISING 



'EXPANDOR 1 Black Box Printer 
Condition. $325.00 Postage 
Paul Phelps, 111 Division St. 
King City, Ca. 93930 



******* 

Excel lent 

Incl uded. 

No. 19, 



Contact the 68 
additional detal Is. 



Micro Journal* office for 



SWTPC 6800 -12K of 2102 

RAM-SWTBUG-Standard 1/0 with manuals 
$525.00 Call Larry Clark 1-615-842-7655 



Classified 

Wanted to buy 'Dead or alive', 68XX devices. 
Computers, terminals, memory (etc) boards or 
anything else pertaining to 68XX computers or 
add-ons. 

Please Indicate condition and price In relurn* 
Give phone number where you can be reached. 



Reply j Box I, 68 Micro Journal' 
HTxson, TN 37343 



30I8 Hamlll Rd., 



Smoke Signal BFD-68 or Percom LFD-400 
Complete Single Drive Disk System. 
Includes Manuals, Diskettes. $500 Each 
Phil 1-312-653-3439 

SWTPC CT-64 $200 Nenad Downing 4610 ST. 
Elmo Ave. Chatt, Tn. 37409 
1-615-821-3727 



HELP 



ISSUE DATE 

Due to timing considerations of our publishing 

dates and the date on the cover of 68 Micro 

Journal*, we are dating this Issue 
November/December 1979. 

It WILL NOT affect how many Issues you receive. 
If you are on a one year subscription you will 
receive 12 Issues* If you are on a three year 

'88' Micro Journal 



Dear Sirs, 

I have a SWTPC 6800, 12K 
byte, AC- 30, CT-64, system. I have tried 
other sources (TSC, Cache) for information 
but without much success. Can you tell 
the following: 
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1) Ply system runs at 300 Baud and I wish 
to purchase a Worldwide Electronics 
Selectric Based Hard Copy Device. Can I 
run n\y CT-64 at 300 Baud while running the 
hard copy device at 110 provided I Insert 
another serial interface into my computer? 

2) Will the above mentioned hard copy 
device be compatible with my system? 

3) I recently purchased TSC Text Editor 
and Text Processing Software. I can get 
the Text Editor to run OK, but the Text 
Processor comes up like the manual says, 
but won't accept Text. Do I have to have 
the Editor and Processor in memory at the 
same time in order to use the Text 
Processor? 

Thank You, 
Jeffery M. Craig 
Apt. 912-3001 S. King dr 
Chicago, II. 60616 

Date Pucketl 
14753 Endsley 
Woodbrtds*. VA 221 W 

A 68 MICRO JOURNAL LAB REVIEW 

PASCAL 

P-6800 PASCAL was written by David R. 
Gibby and the companion Run-Time System 
was created by Nigel W. Bennee. The 
package is published by Lucidata, 
Oosteinde 223, Voorburg 2271 EG, 
Netherlands. 

P-6800 PASCAL is supplied on eitner a 
mini-FLEX or FLEX disk and comes with a 
60-page user guide and reference manual. 
It costs $150. 

In this review I will attempt to give 
you enough information to let you know 
what you can expect to receive if you 
purchase the package. 

But first, we should introduce the 
language. PASCAL was created by Professor 
Niklaus Wirth of the Zurich Technical 
University. Wirth developed PASCAL so that 
he would have a language available which 
would allow him to teach programming as a 
systematic discipline. 

Today PASCAL is one of the leading 
programing languages in computer science. 
Its forte is clarity. 

Fundamental programing ideas can be 
expressed almost directly in PASCAL, 
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making it a very easy language to read, 
understand and use. It is easy to 
understand because it combines the 
readability and general nature of the 
English language with the directness and 
preciseness of a machine language. 

Gibby and Bennee designed the P-6800 
compiler and run-time package specifically 
for the SWTP 6800 system. Because of a 
paging system which is invoked 
automaticaly when needed, it can compile 
and execute programs on a system with as 
litle as 12K of low memory plus the 4K or 
8K required for FLEX. However, the more 
memory you have the faster the system will 
compile a program. 

The compiler reads your source file and 
generates a file of pseudo or P-codes. 
These codes are interpreted later by the 
run-time system. 

The P-codes are designed to be simple 
to decode, allowing programs to be 
executed tens of times faster than 
programs run with conventional 
interpreters, ie, BASIC. A program which 
has been compiled into its P-Code form is 
also very compact. 

If you are skeptical of the power of 
the language you should know that the 
compiler itself is written in a subset of 
the language which it supports. 
Unfortunately however, the source of the 
compiler is not supplied. 

DATA 

There are two parts to a PASCAL 
program; DATA and STATEMENTS. DATA is 
declared or defined. It is held by a 
VARIABLE. It is declared by associating an 
identifier or name with a TYPE. 

The TYPE limits the range of values of 
the DATA. TYPES include BOOLEAN, CHAR, 
INTEGER, BYTE, SCALAR and ALFA. SCALAR 
types are defined by the programmer. 

The DATA is structured into ARRAYS, 
SETS or FILES and all DATA in an ARRAY, 
SET or FILE must be of the same TYPE. 
This is a very important feature of PASCAL 
since it prevents you from accidently 
multiplying oranges by apples and winding 
up with nonsensical results. 

BOOLEAN data has one of two values. It 
can either be true or false. 
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CHAR data may have the value of any 
character within the character set of your 
computer f ie, standard ASCII in most 
cases. 

INTEGER data can be any whole number 
within the limits of the system. In this 
case it is plus or minus 32767. 

BYTE is a special form of the data type 
INTEGER. It may have any value from to 
255. 

Data of the type ALFA is an array of 
six characters which permits easy 
referencing of names and similar strings. 
It should be noted that standard PASCAL 
calls for an array of eight characters in 
ALFA. 

STATEMENTS 
The basic PASCAL STATEMENT is an 
ASSIGNMENT which evaluates an expression 
and calculates a new value for a variable. 
STATEMENTS may be compounded. If so, they 
contain several assignments grouped 
together between two delimiters named 
BEGIN and END. They may also be executed 
conditionally, using various programing 
constructs. Constructs avaialable in 
P-6800 PASCAL include: IF THEN ELSE, WHILE 
DO, REPEAT UNTIL, and FOR T0/D0WNT0 DO. 

PROCEDURES and FUNCTIONS are statements 
that have been given a name. They may be 
used by a program, much like BASIC uses 
subroutines. 

At this point we will list the various 
features that you receive in this version 
of PASCAL. Then, we will tell you which 
features are not available. 

Reserved words in this implementation 
of PASCAL are: AND, ARRAY, BEGIN, CASE, 
CONST, DIV, DOWNTO, DO, ELSE, END, FILE, 
FOR, FUNCTION, IF, IN, NOT, OF, OR, 
PROCEDURE, PROGRAM, REPEAT, SET, THEN, TO, 
TYPE, UNTIL, VAR, and WHILE. 

Special symbols recognized by the 
compiler include: 

♦*«.:([(*"-/:-;...)*)<> 

For readers not familiar with PASCAL, the 
(* symbol means open comment; *) means 
close comnent; and the :- means becomes. 

On a negative note, you will find that 
the following standard reserved words are 
not found in this implementation: GOTO, 
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LABEL, MOD, NIL, PACKED, RECORD, and WITH. 
Symbols not recognized by this version are 
the uparrow and the apostrophe or single 
quote. 

Standard procedures and functions not 
available in P-6800 PASCAL include: PACK, 
UNPACK, NEW, PAGE, GET, PUT, ROUND, ABS, 
SQR, LN, ARCTAN, COS, SQRT, SIN, EXP, and 
TRUNC. The reason that most of these 
functions are missing is the fact that the 
REAL data type is not built into this 
implementation. POINTER and RECORD are 
also missing. 

I feel that the omission of the REAL 
data type is the only major shortcoming of 
this software. Persons desiring to do a 
lot of math work are going to find the 
going difficult as they will have to 
devise various approximation algorithms, 
etc. 

If I had enough time, I would sit down 
and interface n\y SWTPC calculator board to 
the compiler. Yet, if that condition were 
true, I would probably have enough time to 
write n\y own compiler and save $150. 
Again this is a major point, the price is 
pretty steep for an implementation that 
does not deal with REAL data. 

On the positive side, there are several 
features implemented in P-6800 PASCAL that 
are not available in standard versions. 
They are: PEEK, POKE, HALT, USER and BYTE. 

BYTE allows you to save memory when you 
know that your values always fall between 
and 255. The others should be familiar 
to BASIC users. Obviously, they give you a 
tremendous amount of additional power and 
flexibility. 

FLASH 



After this review was written '68 Micro 
Journal* received a letter from LUCIDATA 
describing a new version of P-6800. It 
will be called version 1.9 and will run in 
FLEX 2.0 or 6809 FLEX. It will allow the 
data types REAL and RECORDS and floating 
point numbers will have a nine digit 
precision. 

And, here's more good news, LUCIDATA 
said that they would provide anyone who 
has purchased version 1.1 or 1.2 with an 
update for a "nominal charge" to cover the 
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cost of a disk and handling. They did not 
define the nominal charge. 

SCALARS 

A quick look at the enumerated TYPE is 
in order here, especially for the BASIC 
user who is not familiar with PASCAL* 
Here is an example: 
TYPE 

PERSONS » (DALE, ESTHER, MICHELE); 
COLORS - (RED, YELLOW, GREEN); 



In the statement above a SET has been 
defined. The values are ordered according 
to the sequence in which they were listed 
in the definition. 

Later in the program a SET type can be 
given a range of values, ie, GROUP - SET 
OF PERSONS or TRAFFICLIGHT - SET OF 
COLORS. 1 think these definitions quickly 
show you the power and clarity of this 
language. 

FILE HANDLING 

The following procedures are available 
in P-6800 PASCAL: 

RESET (FILENAME). This statement will 
go to FLEX and CLOSE FILENAME, if it is 
open, then, OPEN FILENAME for read. 

REWRITE (FILENAME) will close the file, 
DELETE any existing file with FILENAME and 
then OPEN a new file with the NAME, 
FILENAME. Obviously, extreme care must be 
taken when using these statements. 

READLN (FILENAME) skips over the end of 
the current line to the first character of 
the next line. WRITELN (FILENAME) 
prepares to write the first character in 
the next line. READ (FILENAME, VALUE1, 
VALUE2, VALUEN) reads from the file and 
assigns the value read to the Variables in 
the list. WRITE (FILENAME, VALUE1, etc) 
writes the list to the proper file. 

OPERATION 

This software is easy to use. For 
instance, if you need to run a PASCAL 
program called DOG which you have already 
compiled, you only need type, RUN, DOG. 
FLEX will load and execute the run-time 
system which will execute the program DOG* 



To compile a program the user types the 
source code into a .TXT file. He then 
uses the coimand line: RUN PASCAL PROGRAM. 

When this comnand is received, the 
run-time system on the system disk is 
executed. It automatically looks for the 
compiler p-code on the system disk. After 
loading the compiler it searches for the 
text file on the work drive. 

The compiler will then produce a binary 
p-code file and a listing file with the 
default extension .OUT on the work drive. 
It will use the system drive for a file 
called PROGRAM. SCR during compilation. 
All of the files are created and the drive 
assignments are made automatically by the 
run-time system. 

OTHER COMMENTS 

Overall, the manual supplied with 

P-6800 is detailed and adequate. It even 

provides a chapter that tells the user how 

to optimize his program so that the 

resulting p-code will be as efficient as 

possible. However, there are a few places 
in the manual that could stand 
improvement. 

I was able to figure everything out by 
experimenting but I felt that specific 
examples of various operational comnands 
should have been given in the manual. 
This could be done on one page in a chart 
which would contain a specific example of 
a conmand line for the many various 
options the user might require. For 
example, you can change the name of the 
listing file if you wish, or you can 
append a minus sign (-) to the end of the 
word PASCAL to compile a program without a 
listing. 

The problem is that all of this 
information is buried in written text and 
is hard to find at a glance. A page of 
examples of various conmand lines would be 
a great help for the beginning user. 

A confusing prompt in the program, 
combined with the sketchy operational 
details in the manual can really cause you 
to scratch your head for awhile. After 
the run-time system billboards itself, it 
asks you the question, "CHANGE STACK?" My 
first impression was that the machine 
wanted me to answer Yes or No, or maybe, Y 
or N. Not so. 
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After generating several error codes I 
discovered that I could enter a hex 
address without causing an error. It 
never even occurred to me for several days 
that I could have typed a carriage return 
to default to the present stack value of 
1000 hex bytes. I think the manual should 
have included this detail. 

On a positive note, it is possible to 
customize the run-time system and the 
manual provides the necessary information. 
Customizing is done by appending or 
overlaying user assembled object code to 
the RUN.CMD file. In fact, the authors 
provide two very useful overlays with the 
system. One allows you to execute PASCAL 
programs directly without answering the 
prompt for stack size changes. The other 
tells you what addresses to save to create 
a comnand file which will execute directly 
from FLEX. 

Complete pictorial syntax diagrams are 
given for all statements in the 
implementation. Also eight simple programs 
are included on the disk which demonstrate 
to the user how to solve several problems 
with the language. 

In conclusion, I feel that P-6800 
PASCAL is pretty good for a first 
implementation. For users that do not 
require extensive math operations it 
provides an ideal way to get started in 
PASCAL* It is a tremendous improvement 
over BASIC* 

Gibby and Bennee should be commended 
for taking the effort to make such a 
powerful language available to users of 
small systems with limited amounts of 
memory. With the addition of the data type 
REAL, random files and some higher math 
functions, plus just a little improvement 
in the documentation, this implementation 
would be outstanding. 
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PSYMON (ASSY/SOURCE) 



Ptrcom Daia Co. 
21 1 N. Km by 
Garland, TX 7S042 



ooooi 

00004 
00005 
000 OS 
00007 
00008 
00009 
00010 
00011 
00013 
OOOll 
00014 
0OG1 ■. 
0OCJ6 

ooo n 
oooii 

00019 
00020 
00021 
00022 
00021 
000 2 4 
OOO 21 
000 1 6 
000 27 
00028 
0002 9 
OOO JO 
000 J 1 
00012 
00033 
00014 
OUOlS 
00026 
00037 
UOCUB 
000)9 
1 04 \ 
OOOII 
00042 
00043 
0004 4 
00045 
00046 
00047 
00041 
00049 
000*0 
O0O5I 
00057 
00053 
00054 
00055 
0005* 
000 5 "? 
0005B 
00059 
00060 
00041 
00062 
00O6 3 
00064 
00065 
iiOOfi* 
00067 
00068 
00068 
00070 
08071 
00072 
0OC73 
0O074 
00075 
00076 
O0Q77 
00078 
O0O79 
00080 
0O0B1 
00082 
0OQJ3 
00084 

00066 
00067 
00088 
00089 
00090 



O0O92 
00091 
00094 
00095 



NAN PSYKON 



rcoo 

MOO 
AOOO 
8004 



OOOD 
OOOA 
0020 



PSYMON VERSION I. 00 

COPYRIGHT Id 1979 PE»CON DATA COMPANY, INC. 
PEACON DATA COMPANY r INC. GRANTS UNRESTRICTED 
ROYALTY-FREE LtCBNSE FOR THI USE OP THIS 
PROGRAM PROVIDED THE JSER CLEARLY ACKNOWLEDGES" 
ITS ORIGIN. 

WHILE THIS MONITOR IS VERY SIMPLE, ITS TRUE 
POWER LIES IN ITS EXTENSIBILITY AND IN THE 
TOOLS THAT IT PROW IDE 6 FOR OTHER SOPTWARB 
TO USE. THIS OPERATING SYSTEM IS DEDICATED 
TO HAROLD HAUCN 1*0 HIS LEGENDARY 512 BYTE 
OPERATING SYSTEM. 

COMMANDS l 

M <ADO*ES5> - MEMORY EXAMtNS/CNANGB 

<A0OAE8S> - CO TO ADDRESS 

R <REC1STBR> - REGISTER EXAMINB/CHANGE 

L - LOAD P ROC RAM PROM TAPE 

S <START> <END> - SAVE PROGRAM TO TAPE 

B <ADMESS> - SET/LIST BREAKPOINTS 

U <ADDRSSS> - t/WBBT BREAKPOINTS 

2 • JLINP TO PROM AT ADORESB COOO H X 

CALLABLE SUBROUTINES 

INCUR - INPUT CHARACTER PROM CONSOLE 
OUTCHR - OUTPUT CHARACTER TO CONSOLE 
REQJO - PERFORM I/O TO PERIPHERAL 
CETHEI - INPUT HEX NUMBER PROM CONSOLE 

INHEX * INPUT HEX DIGIT FROM CONSOLE 
DSPSBV - DISPLAY SINGLE SVTE L SPACE 
DSPDBY - DISPLAY DOUBLE BYTE b SPACE 
OUTHEX - DISPLAY 2 HEX DIG 1ST 
PSTRNC • DISPLAY STRING ON CONSOLE 
LOAD - LOAD HEX PROGRAM PROM CONSOLE 
SAVB - SAVE HEX PftOC*AH TO CONSOLE 
CRLP - BEGIN NEW LINE ON CONSOLE 
DOTS • OUTPUT SPACE «T0 CONSOLE 

ALL 1/0 WITHIN PflYHON IS DONE THROUGH THE 
USE DP DEVICE CONTROL BLOCKS. THIS ALLOWS 
EASY MODIFICATION BY THE USER. PSYMON HAS 
rOVR DCB POINTERS INITIALIZED TO POINT TO THE 
CONSOLE (AC1A) DCB. TNEV ARK USED AS 
POLL Bt 

CI DCB - POtWTS TO DCS USED POR CONSOLE 

INPUT (CHARACTER I/O I. 

POINTS TO DCB USED PO ECHO Of 

CHARACTERS RECEIVED USING C1DCB. 

ECHO NAY BE SUPPRESSED BY SETTING 

THIS POINTER TO ZERO. 
CODCS - POINTS TO OCB USED FOR CONSOLE 

OUTPUT (CHARAC EN I/O). 
TPDCB - POINTS TO DCB USED FOR PSYMON 

TAPE LOAD * SAVE COMMANDS. 

THE PSYMON COMMAND TABLE AY BE EXTENDED 
OR CHANGED BY SETTING THE POINTER 'L1SRTSL 1 
TO THE ADDRESS OP A USER COMMAND TABLE. IT 
IS INITIALIZED TO ZERO. INDICATING NO USER 
TABLE EXISTS. 

THE PERCOH SYSTEM HON1TOR (PBYHDN> WAS 
R1TTEN BY A TEAM OP PROGRAMMERS U INC 

STRUCTURED TECMNlOUES. THE TEAM MEMBERS 

ARE AS FOLLOWS I 

HAROLD A MAUCH - PRESIDENT, PfRCON DATA 
NIXE FOREMAN - 4809 PROJECT LEADER 
BYRON SEASTRUNR - DESIGH EHOINEER 
CLIFF RUSHING - PROGRAMMER 
JIN STUTSMAN - CHIEF PROGRAMMER 

ADDITIONAL INFORMATION REGARDING THE USE DP 
'PSYMON 1 NAY BE OBTAlNEO rftONi 

PERCCM DATA COMPANY , INC. 

211 NORTH KIRRY 

OAKLAND, TEXAS 75042 



CEDCB - 



■ SYSTEM ADDRESS CONSTANTS 1MP-A2 VERSION) 
ROHl SOU SPCOO BASE ADD OF PSYMON ROM 

ROM2 EOU frftOO BASE ADD OP EXTENSION ROM 

RAM EOU SA0O0 BASE ADD OP 128 BYTE RAH 

TERMNL EOU SE004 6YSTBN TERMINAL ACIA 



• ASCII CHARACTER CONSTANTS 

CR BDV SOD CARRIAGE RETURN 

LP EOU SOA LINE FEED 

SP EOU $20 SPACE 
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00097 

00044 
00100 
00101 



00101 
00104 
00101 
00106 
00107 
00 10# 
00109 
OOilO 



00112 
0P113 
00114 

QQ1L* 

00118 
00119 AOOO 

00121 

O0122 AOOO 
0012) 

00124 A028 

00 125 AD29 
O0U« A02A 
00127 A028 
0Q12B AOJC 
00129 A02E 
001)0 A0)0 
001)1 A012 

001)3 
001)4 A034 
00135 

001)7 

001)8 A052 

001 19 A0 54 

001 10 ACS* 

00141 A057 

0014} A0 46 

0014) A04A 

00144 AOSC 

00146 
00147 AOSI 

00149 
00140 A06I 

oom AOM 

OC152 A06C 
00143 A06E 
001(4 A070 

0015« 

00 LIT A07 2 

001** A074 

001 it A076 

00160 AO?l 
0016 L A07A 
00162 A07C 

00161 A:-r 

00164 

00166 PCOO 
00.167 
00168 
00169 

00170 PCOO 

00171 FC04 

00172 FC06 

0017) rcot 
00U4 rcot 
oon4 rcoo 

00176 PC11 

00177 icn 
00171 PCI 4 

00179 FOB 

00180 rciA 
ooni fc id 

00182 PC20 

00 183 PC2 3 

00184 FC25 
001*4 rC2S 
00186 FC2t 
00117 fCJO 
00186 PC2P 



000) 
0011 
0041 
0011 



0000 
0002 
0004 
0006 
0008 
0009 
OOOA 



0001 
0002 
0004 
0008 



0028 
A028 
0001 
0001 
0001 
0001 
0002 
0007 
0002 
0002 



00*6 
A042 



0002 
0002 
0001 
0001 
0002 
0002 
0002 



0002 
0002 
0002 
0002 
0002 



0002 
00O3 
0002 
0002 
0002 
0002 
000} 



IOCS A028 
IF 41 

er to 

BC A060 

26 rt 

IDEE PPA4 
IC Al 



II 

ao«o 

fT 
AC5E 

0308 
PD6 3 
U 

PD6 3 
FfrOO 
TE 
03 
P600 



00190 

001*1 

00192 

0019) PC12 LOCK A028 

00194 PC)6 IOPP A04C 



00196 
00 It? 
00196 
00199 
00200 
00201 
00202 
00203 
00204 
00 204 
00206 



PCJA IE 
PC 10 80 
PC40 80 
rc<3 80 
FC45 26 
FC47 60 
PC 4 A M 
PC4C 20 



00208 rC4f 
PC4P 

00209 fCSO 
PCS) 
PCM 

00210 FC53 



PC4E 

PD97 

TD4 4 

OP 

PI 

PD74 

94 

EC 

OD 
OA 
43 
40 
<* 
8P 



■ ACIA CONTROL CONFIGURATIONS <MP-8 VERSION) 
IESET SOU $03 REEET ACIA 

CONPIG CQU 611 8 DATA, 2 STOP. »0 PARITY 

RORON BOO COWFIG+640 READER OW IRTS KICK) 
ROROFr BQU CONFIG READER OPP (RT6 LOW) 



* PSYNON OCR OPPB6T8 



DCBLNK SOU 





DCBOIO BOU 


2 


PC8DVR BOU 


4 


OCBIOA BOU 


6 


CBtRR EOtl 


B 


OCSEXT SOU 


9 


OCSAPP CQU 


1 



PTR TO NEXT DCS IN CHAIN 
ASCII 2 CKAR 0BV1CB ID 
DEVICE DRIVER ADORES* 
DBV1CE 1/0 ADDRESS 
ERROR STATUS COOE 
DCS EXTENSION 6VTE COUNT 
ORIVER DCB APPENDAGE 



■ PSYMON OCR FUNCTION COOES 

READFN ECU 801 RBAO FUNCTION COOC 

B02 WRITE FUNCTION COOC 

B04 STATUS FUNCTION CODE 

SOB DEVICE CNTRt PUNCT COOE 

* PSYMON RAM DEFINITIONS <MP-A2 VERSION) 

ORG R 

• PSYMON INTERNAL STACK U RtGlSTER» SPACE 
STACK SPACE 

CONDITIO* COOE REGISTER 

A REGISTER 

8 REGISTER 

01RECT PAGE REGISTER 

X RRG1BTER 

¥ REGISTER 

U STACK POINTER 

PROGRAM COUNTER 



WR1TPN COD 
6TATPN rOU 

CNTLPN EOU 





RMS 


4 


STACK 


BOU 


« 


REGC 


RMB 


1 


REGA 


u*>b 


1 


m 


RMR 


1 


REGD 


RMS 


I 


RECX 


RHfl 


I 


RtGY 


RNt 


1 


REGU 


una 


2 


RfCP 


RMB 


7 



FC66 E< 


80 6 SEARCH LDB 


,x* 


GET ITEM LENGTH 


FC6B 60 


OA 


T SERCH1 BSR 


CON PAR 


COMPARE CURRENT HEN 


PC 6 A 1A 




I ABX 




ADVANCE TO NEXT ITEM 


PC64I 27 


06 


SCO 


SXRCRX 


EXIT !F NATCH 


FC60 30 


02 « 


i LEAK 


2rX 


STB OVER ADORES* 


PC6P 6D 


64 ( 


» TST 


*x 


END OP TABLE? 


PC71 2 A 


P4 


1 RPL 


SERCN1 


LOOP IP NOT 


PC7) 39 




> SBRCHX RTS 







■ PSYMON BREAKPOINT TABLE 
6PTABL RRB 30 BPACB 
BPTENO SOU 

• PSYNON WORK AREAS 



POR 10 BREAKPOINTS 



MIMPTR 


RMB 


2 


UShTBL 


RNB 


1 


COMAMO 


RNB 


I 


CKSUH 


RMB 


1 


B EGA DO 


RMB 


i 


EN DADO 


RMB 


i 


BTKPTR 


RMB 


2 



MEMORY INTER POR *H* CNO 
ADDRESS OP USER COMMAND TBL 
COMMAND CHAR STORAGE 
LOAD, SAVE CHECKSUM 
BEGIN ADORNS POR SAVE 
CNO ADORBBB POR SAVE 
CONTENTS OP STACK PTR 



• THE PSYN K CONSOLE PCS 

CONDCB RNB 10 NO EXTENSIONS 



* PSVHON DCB POINTERS 



BASE Of DCB CHAIN 
CONSOLE INPUT DCB 
CONSOLE ECHO DCS 
CONSOLE OUTPUT DCS 
CASSETTE TAPE DCS 



SOFTWARE INTERRUPT 3 
SOFTWARE INTERRUPT 2 
FAST INTERRUPT REQUEST 
INTERRUPT REQUEST 
SOFTWARE INTERRUPT 
NON-HASKA RLE I NT ERR LI FT 
RE-ENTRY INTO PSYMON 
■ PSYMON ROM COOING 
ORG ROM! 

ltl«tlltllllll»(l»f««»ttMltMMI« •«•«••••• 

• PSYMON INITIALIZATION • 

•••••••••••••«■■«•••••»••••••••••••••■■■••••••••• 



DCBCMM 


RMB 


2 


CI DCB 


RMB 


2 


CEDCB 


RMB 


2 


CO DCB 


RMB 


2 


TPDCB 


RMB 


2 


• PSYMON VICTORS 


SHI1V 


■ MR 


2 


SWI2V 


RMB 


1 


F1R0V 


RMB 


2 


IRQV 


RMB 


2 


Mil 


RMB 


2 


MM IV 


RMB 


2 


RESTRT 


RMt 


2 



INJT 



TPB 

CLR 

CMPX 

SHE 

LDY 

LOO 

BTO 

CMPX 

BNB 

LOX 

LOO 

J BR 

LOA 

JBR 

LDA 

CMPA 



•STACK SET UP STACK POINTER 

S.X POINT X AT STACK 

,X* CLEAR A BYTE 
1COWOCB+2 ALL FIELDS CLEAR7 

1NITI LOOP IP NOT 

IRAMINT POINT TO HAM DATA 

,Y+« MOVE 2 BYTES 

*RESTRT»2 END OF RAM? 

INIT2 LOOP IP NOT 

ICOWDCB POINT TO OCB 

»RE8ET*246*CNTLPN A.RESET, B«C TLFN 

RtOlO RES T ACIA 

♦CONFIG CONFIGURE ACIA 

REOIO 

m 

• 571 

MOMENT 
ROM 2 



00212 
002 1 1 
002 M 

00214 PC44 108E A046 

00216 PC3I A7 A4 

00217 PC4A 81 A044 
00216 PC40 27 04 
0021t POP ID OS 
00220 FC61 27 10 
00331 PC63 68 PP6B 



00223 
00224 
0O2J4 
00226 
00227 
□ 022 8 
00229 
00210 
002)1 
00212 
00233 
00234 
00214 
00236 
00237 
0021B 
00219 
00240 
00241 
00242 
00241 
00244 
0024 4 
00246 



O024S 
O024t 
00240 
00241 
00242 
00242 
00254 
00244 
00246 
00247 
0O258 
00259 

00260 PC74 )4 34 

00261 FC76 A6 80 
00 262 rC7fl Al AO 
0026) PC7A 26 0) 

00264 FC7C 4A 
M2H PC7D 26 F7 
00266 FC7P 35 B4 

00260 
00269 

00370 

00271 PCt I PC A06A 

0O27 2 FCB4 BE A06C 

0O27J FCST )4 16 

00274 PCtt BE A070 

00275 FCtC 4F 

00276 PCiO 5F 

00277 PCBK RF A06A 
00378 PC91 PD A06C 

00279 PC94 CC 5)06 

00280 ret? SD PD63 
00261 rcfA j le 
0O282 FC4C CC 1108 
002B) FCtr BE A070 
00284 PCA2 BD ID63 

00265 fCA4 35 16 
00386 PCA7 PD A06A 
00287 PCAA RF A06C 

00268 FCAD 7D A057 

00269 rCRO 27 45 



LOOK UP COMMAND |N TAtLI 



CHECK POR SECOND ROM 
IS TReRE A JUMP TBERE? 
GO IP MOT 
CALL SECOND ROM 



• PSYNON UBER ENTRY 

■ •««■«••■•••••••• • ■ •••••■ ■ 

4 MOMENT IDS »STACK 

7 STB TKPTR 



l>t»l«Mlttlttt«ll 

BET STACK POINTER 



■•«••••••■••• 



■■••■•■••••■■•••••••••••••■■■•a 

■ OCT CON AND 

■•••••■■a ■« •«««••»««•»■••■»■•••■•■«*«*■«»«••«««*( 

OETCMD LOX IPROMPT DISPLAY PROMPT 
JBR PSTRNC 

INPUT COMMAND CHARACTER 

LOOK IT UP 

LOOP IP NOT POUND 

OUTPUT A SPACE 

CALL COMMAND ROUTINE 

GO BACK POR MORE 



JSR IHCHR 

BSR LOOKUP 

BNB CETCMO 

JSR OUTSP 

JSR [,X] 

BRA CETCMD 



PROMPT PCS 
FCC 



Cft,LF 

•CMD» 



CNO OF STR1NC 



00291 
00292 
00213 

00294 PCB2 86 

00295 PC84 7B 



00297 
00296 
00299 
00300 
00101 
00303 
O01O) 
00)04 
00305 
00306 
00307 
00)06 
00309 
00110 
00311 
00)12 
00)1) 
00)14 
00315 
30)16 

oojp 

00)18 
00)1? 
00120 
00121 
00132 
00321 
00324 
00325 
00326 
0012? 
O0326 
00329 



LOOKUP LDY ICOMAND POINT Y TO COMMAND 

STA t f SAVE CONHANO CHAR CTBR 

LOX JSRTBL GBT USER TABLE ADD EBB 

BBO LOOK1 GO IP NONE 

BSR SEARCH SEARCH USER TABLE 

BBO BtRCMX GO IP POUND 

LOOM1 LOX ICNDTfL SEARCH INTERNAL TABLE 



OBNERAL TABLE SEARCH 



• ENTRY REQUIREMENTS: 



X - POINTS TO TABLE • 
Y - POINTS TO ITEM 

• TIRBT BYTE OF TABLE MU8T * 

• CONTAIN ITEM LENGTH 

• LAST BYTB NU TBI rr - 

• * 

• EXIT CONDITIONS! C - 1 SET IP POUND, CLEAR • 

• IP NOT POUND ■ 

• 1 - POINTS TO ADOMEIS OP * 

• ROUTINE POR MATCH 

• A, B - CHANGED * 



■ GENERAL STRING COMPARE 



ENTRY REQUIREMENTS* 



- AOOREBS OF STRING I 

- AOOREBS Of STRING 2 

- LENGTH OF STRlNOB 



• EXIT CONDITIO Si 



C - SET PER COMPARE 1 1 2 
B»X«Y - UNCHANGED 
A - CHANCED 



9 COHPAR PSHS B,X,Y SAVE RBG1STER8 



6 C0HP1 
6 

1 
2 
) 



LOA ,X+ 

CMPA ,Y-f 

BN COMP2 

DECB 

BNE COMF1 



GET HEXT CHARACTER 
COMPARE IT 
EXIT IP UNMATCHED 
OCCREMENT LOOP COUNT 



11 COMP2 PULS B.X.Y.PC RESTORE REGISTERS t EXIT 



• LOAD PROGRAM PROM TAPE 



TLOAO LOO 
LDX 
PSHS 
LDX 
CLRA 
CLRS 
STX 
BTO 
LOO 
JSR 
BSR 
LDD 
LDX 
JSR 
PULS 
STD 
STX 
TST 
BEO 



C1DCB 
CEDCB 

A. S.X 
TPDCB 



SAV6 COMBOLB DCBB 



POINT TO TAPE OCB 
SET D TO 



CI DCB BET TAPE IN, NO ECHO 

CEDCB 

IROROMI246+CNTLPN RAISE ROM CNTRL 

R60)O 

LOAD LOAD THE TAPE 

IROROPF«J56-»CNTLPN DROP R P CflTRL 

TPDCB 

HEQJO 

A. S.X RESTORE COHSOLE DCBB 

CI DC 6 

CEDCB 

CKSUH ANY ERRORS? 

LOADX CO IF HOT 



)P 
P04B 



• DISPLAY ERROR INDICATOR Of W * 

••••■•■•■•••••■•••••■■■■■■•••••••■•••••••■■■■■■■a 

3 ERROR LDA I*? DISPLAY ERROR INDICATOR 

4 JMP OUTCHR 



• LOAD PROGRAM IN HEX FORMAT 

■ 

■ ENTRY HBOUIREMSMTBj NOME 



• EXIT COMOITlONBj ALL RCCIBTBRS CHANGEO 

* CKSUH NON-EBRO IP ERROR 



MARX STX FOR ERROR RCVRY 

GBT A CHARACTS 

START OF RECORD? 

LOOP If NOT 

GET ANOTNBR CHARACTER 

END OP LOAD? 

GO IP YES 

START OP RECORD? 

LOOP tf NOT 

IN1T CHECKSUM 

READ LENGTH 

ADJUST IT 

SAVE IN t 

GET ADDRESS HI 

SAVE ON STACK 

GET ADDRESS LO 

PUT ON STACK 

ADDREIS NOW IN X 

READ A BYTE 

DECREMENT COUNT 

GO IP DONE 

STORE BYTE 

VERIFY GOOD ST RE 

GO IP ERROR 



FCB7 


IF 


42 < 


LOAD 


TPR 


S,Y 


FCS9 


BL 


P044 1 


LOAD) 


JSR 


IMCNR 


FCTC 


e; 


4) 1 


LOA02 


CMPA 


I'B 


FCBE 


21 


F9 




BNE 


LOAD1 


PCCO 


6C 


FD44 J 




JBR 


INCHR 


PCC) 


|| 


39 




CMPA 


4't 


FCC 5 


11 


30 




BEO 


LOADX 


FCC? 


aj 


31 




CMPA 


I'l 


pcci 


2£ 


PI 




BNB 


LOA02 


FCCB 


?F 


A047 I 




CLR 


CKSUM 


PCCE 


80 


28 1 




BSR 


1NBYTE 


PC DO 


80 


02 




BUBA 


12 


FCD2 


IP 


89 




TPR 


A.B 


PC 04 


60 


33 




BSR 


1HBYTB 


PC 06 


A? 


El 1 




STA 


• ••• 


FCD6 


BD 


IE 1 




BBR 


IHBYTC 


PC DA 


17 


11 ! 




STA 


1,8 


FCDC 


u 


10 i 




PULS 


X 


PCDt 


M 


IS 


' LOAD3 


BSR 


INBYTE 


PCEO 


BJ 






DECB 




PC El 


11 


08 




BBO 


L0A04 


PCE3 


%1 


84 i 




ETA 


.X 


FCE5 


AL 


80 i 




CHPA 


#x* 


res? 


2£ 


07 3 




BNB 


LOADS 
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00330 FCS9 


20 


PI 


3 




BRA 


LOAOl 






00449 








■ 




• 


003 11 rCEB 
00 13 J FCBB 


M 

27 


A057 
C9 


7 
1 


LOAD4 


INC 
BEO 


CKSUM 
LOAOl 


CHECK CHECKSUM 
LOOP IF COOO 




004)0 
004)1 








• ENTRY REQUIREMENTS 


t A - DRIVER PARAMETER 
B * FUNCTION CODE 


• 
• 


00313 FCFO 


66 


rr 


2 


LOAD) 


LP* 


4$rr 


SET ERROR FLAG 




004)2 
00453 










X - DCH ADORE66 


* 


00114 PCP2 


67 


AO)7 


) 




BTA 


CXSUH 


















DQ339 fcri 


tr 


24 


6 




TFR 


Y»6 


RESTORE STACK 




00454 








• EXIT CONOITIOHSi 


A - DRIVER RESULT 


t 


003 36 PCP7 


39 




5 


LOAD* 


Ml 








004)5 
004)6 








i 


ALL OTHERS PMBBER ED 
EXCEPT C 


■ 


00)36 


















00457 
00450 
004)9 
00460 


P061 


34 


34 


■ 




p 


00339 


• INPUT BYTE 






• 


9 REQIO PSH6 S.XrY 
12 JSR IPC10VR 


SAVE R EG 1 ST E AS 
.XI CALL DRIVER 




00340 

00341 rem 


BO 


31 


"J 


1N6YTE 


681 


INNEX 


GET HEX DIGIT 




FD6) 


U 


9B 0« 




00142 fcfa 


n 


tt 


3 




BEO 


LOAD4 


GO IP ERROR 




00461 


FD4B 


y$ 


14 


Zl PULS ft,X,Y«PC RESTORE REGISTERS & EXIT 




ooi4 j fcfc 


** 




2 




AC LA 




BHIPT TO N6 HALF 


















00144 PCPD 

00145 PCPI 


48 

46 




i 
2 




AS LA 
AS LA 








00461 
00464 
0046) 
00466 
00467 
00466 








■••••••••■••«•«■•■••■•••••••••••■••••••••••■••■•• 

• DISPLAY OOUBLE BYTE • 


00146 PCPP 

00147 PD0O 

00148 POP 2 


46 

M 

do 


02 
29 


2 
5 

7 




ASLA 

PSH8 
S6R 


A 
XNNBX 


8AVE DIGIT 

GET ANOTHER DIGIT 










• ENTRY RBCU1REHENT6 


I A, 8 - DOUBLE BYTE 

TO BE PRINTED 


a 


00149 P004 


27 


fi 


J 




BEO 


LOA04 


GO IF ERROR 
















001M POM 
00 ML PDOO 


Hf 

BB 
B ■ 


£4 
B4 

A0)7 
A0)7 


4 

i 

s 




ADDA 
STA 

ADDA 
BTA 


,5 
.6 

CX8UH 
CK5UH 


COMBINE HALVES 
SAVE ON STACK 
ADD TO CHECKSUM 




00469 
00470 

00471 
00472 








• EXIT CONDITIONSt 

* 


ALL REGISTBRS PRESERVED 
EXCEPT C 


* 


OOJ52 FDOA 

oom food 






• I 


00))4 PD10 


3S 


62 


7 




PUL8 


A, PC 


GET RESULT 4 RETURN 




004 7 3 
00474 


F06A 
FD*C 


BO 


11 
A9 


7 OSP08Y 8SR OUTHfX 
7 EXG A. S 


DISPLAY A AS 2 HEX DIGITS 
LS BYTE TO A 




00)56 
00157 


















004 7) 
00476 


F06E 

PD7Q 


60 
IF 


03 
89 


7 BSR 0BPB6Y 
7 EXG A, 6 


DISPLAY AS 2 OtGlTS. SPAC 
RESTORE A * 8 


E 


* GEY 


NBX NUMBER FROM 


CONSOLE 






00))6 








• 








t 


00477 


P072 


19 




) RTS 






001)9 








* ENTRY REQUIREMENT* i 

• 


MONB 


• 
• 


00479 














00160 








00 ML 








• EXIT 


CQNOITIONSt A 


- LAST CHAR IHPUT 




00460 
00481 








• PI6PLAY A BYTE AND SPACE 


■ 


00)62 








• 




B 


- HEX DIGIT COUNT 


t 








* 




* 


00161 








* 




X 


• HEX NUMBER 


• 


00402 








■ ENTRY REQUIREMENT! 


e A - BYTE TO BE OISPLAYEO 


• 


00164 








* 




c 


- SET ACCORDING TO B 


i 


00483 








■ 




■ 


0016) 








• 








■ 


004)4 








• EXIT CONDITIONS I 


ALL RECIBTERB PRESERVED 


• 


00166 

00367 FDI2 
00146 FPU 


















0046) 








* 


EXCEPT C 


• 


'3f 

B£ 


0000 




GETNEX 


ClflB 
LOX 


10 


IN IT DIGIT COUNT, RESULT 




00466 
00467 








• 




• 








00169 PD16 


tP 


1) 




gethxi 


BSR 


XMNEX 


OBT A PtCIT 




0046S 


FD73 


60 


OB 


1 DSP8BY B8R OUTH8S 


DISPLAY 8YTE IN A 




00170 roie 

00171 FDIA 


if 
11 


11 

01 






PRO 
BXG 


GETHX2 


GO IP HOT HEX 
OLD RESULT TO A , B 




00490 




















00172 FD1C 


)8 








AC LB 




BHIFT LEPT 1 OIOIT 




00491 








* OUTPUT A 8PACE TO 


THE CONSOLE 


* 


00173 roiD 


16 








ROLA 








00492 








• 




* 


00174 rou 


U 








AS LB 








0049 3 








• ENTRY REQUIREHBNT8 


t HONE 


* 


001?) fpif 


49 








ROLA 








00494 








■ 




• 


00174 FD2Q 


)» 








ttU 








0049) 








* EXIT CONDITIONS I 


ALL REGISTERS PRESERVED 


• 


0017 7 PD21 


49 








■OLA 








00496 








• 


EXCEPT C 


• 


00371 FD22 


58 

4* 








A* LB 
ROLA 








00497 
00496 








4 




* 


00 379 FD21 








OQ360 FDJ4 


IE 


M 






BAG 


D,X 


REPLACE RESULT 




004*9 


F07) 


34 


02 


) OUT8P P6BS A 


BATE A REGlHTER 




00361 PD26 


30 


66 






LBAX 


A r X 


ADO IN HEM DIGIT 




00)00 


FD77 


86 


2$ 


2 LDA ISP 


OUTPUT A SPACE 




DttU TL2B 




E8 






1NCB 

■ha 


GETHXI 


ADD TO DIGIT COUNT 
LOOP FOR NONE 




00)02 














0036 3 FD29 








00)14 ruiE 


5D 
19 






GETHX2 


T8TB 

RTB 




BET/RESET 1 FLAG 




00)0) 
00504 








• OUTPUT CHARACTER. 


RESTORE A, « RETURN 


* 


oo>6) n>2c 


























00)0) 


F079 
P07B 


60 
1) 


DO 
82 


7 OUTCHX B8R OUTCHR 
7 PULS A. PC 


DISPLAY CHARACTER 
RESTORE 4 SXIT 




00367 
00106 








• CBT 

* 


HBX OICIT PRON 


CONSOLE 


■ 
* 


00)06 
00)06 




O0309 








00190 








• ENTRY Rl IREMEHTSl 


NONE 


* 


00)09 








• DI8PLAY A REOISTER 


AS 2 HEX PX0IT6 


• 


00)91 








* 








• 


00)10 








• 




■ 


00192 








• EXIT 


CONDITIO 


- HEX DIBIT OR NON-HEX 


• 


00)11 








• EHTRY REQU1REMEHT6 


t A - SYTE TO DISPLAY 


• 


0039 3 








* 




c 


- 1 FLAG SET IF A NOT HEX 




00)12 








a 




* 


00114 








* 




ALL OTBB" 


• 


00)11 








• EXIT CONDITIONS) 


ALL REGISTERS PRESERVED 


* 


0039) 








I 








• 


00)14 








• 


EXCEPT C 


• 


00)96 


















00)1) 








• 




• 


00)97 FD2D 


ID 


11 




INNBX 


BSR 


INCHR 


GET A CHARACTER 




00)16 














00)96 PD2P 


i* 


2 






FBN6 


A 


BAVE IT 




00)17 


PD7D 


14 


02 


) OUTHEX PSHS A 


BAVE THE BYTE 




00149 roll 


BO 


JO 






8U8A 


1930 


CONVERT TO BIHAR* 




O0)lfl 


P07P 


44 




2 LSRA 


GET HS DIGIT 




00400 PD33 


2B 


M 






BM1 


INHEX2 


GO IF HOT NUMERIC 




00)19 


PDSO 


44 




2 LSRA 






00401 rtm 


41 


H 






CKPA 


#$09 


GREATER THAM 9 7 




00)20 


POOL 


44 




2 L6RA 






06402 PD37 


21 


*? 






lit 


XNHEKI 


GO IP HOT 




00)21 


FD62 


44 




2 L6RA 






00403 rait 


62 


o? 






SUB A 


1107 


CONVERT LETTER 




00)22 


FOB! 


*r- 


06 


7 S8R 0UTD1G 


0I6PLAY IT 




00404 PDJB 


11 


■f 




IHHEXi 


CMPA 


•tor 


GREATER THAN 157 




00)2) 


FDR) 


Afr 


E4 


4 LOA ,S 


GET LS DIGIT 




004Q) PDlO 


?3 


11 






IL8 


urufxi 


GO IF HOT 




00)24 


FOB7 


BO 


02 


7 BSR OUTOIG 


DISPLAY IT 




00406 fpif 


*.t 


B4 




XMHCX2 


LDA 


,& 


GET ORIGINAL CHAR BACK 




00)2) 


PD69 


1) 


62 


7 PULS A. PC 


RESTORE A 4 RETURN 




00407 rD4L 


A| 
19 


BO 




INHBX1 


CMPA 
RTB 


.84 


BET/RESET Z PLAC 




00527 














00400 PD43 


























00)26 
00)29 
00)30 








* DISPLAY A HEX OIOIT 


* 


00410 
00411 








• CONSOLE INPUT ROUT1HS 


. 


FD8B 


M 


OF 


2 OUTOIO AHQA 4fOP 


MASH DPP DIGIT 




006 L 2 








1 








• 


00)31 


RMD 


*P 


H 


2 ADDA It 30 


CONVERT TO ASCII 




0041) 








■ ENTRY REQUIREMENTS) 


HOVE 




00)32 


FD6F 


■ 1 


19 


2 CMPA 66 39 


BIGGER THAM 97 




00414 








a 








• 


06)11 


F091 


21 


C) 


1 6LS OUTCHR 


GO IF NOT 




00415 








■ BXIT 


CQWOITK 


- CHARACTER WITH PARITY 


• 


00)34 


FD9J 


8B 


07 


2 AQOA 1107 


CONVERT TO LETTER 




0O4L6 








* 






REMOVED 


t 


00)3) 


P09) 


20 


CI 


2 BRA OUTCHR 


PRINT AND EXIT 




0**17 








* 




ALL OTHER RJJQB PRESERVER 


* 
















00416 








* 




EXCEPT C 


• 


00)17 














00419 








• 








* 


00)18 
005)9 
00)40 








• PRINT A STRING TO 


THE CONSOLE 


• 


00420 
00431 PD44 


14 


14 




INCUR 


PSH6 


B.X 


BAVE REGISTERS 










• ENTHY CONDITIONS! 


X - POINTS TO STRING 


« 


00422 P046 


6B 


A06A 






LOX 


CIOCB 


POINT TO INPUT DCS 




00)41 








* 


LAST SYTE HAS SIT 7 ON 


• 


004 21 PD49 


Cfi 


01 






LOO 


IREADFN 


SET UP PON RBAO 




0054 2 








• 




* 


00424 PD4B 


Bl> 


16 






6BR 


RCQ10 


READ A CHARACTER 




00)41 








• EXIT CONDITIONSt 


X - POINTS L BYTE PAST END 


■ 


0042) FD4D 


B4 


It 






ANDA 


|S7F 


REMOVE PARITY 




00)44 








* 


A.C - CHANGED 


* 


00426 PD4P 


BE 

34 


A06C 
03 






LP* 
PBKB 


CBOCB 

A 


POINT TO ECHO DCS 
SAVE CHARACTER 




00)4) 
0054S 








* 




» 


00427 PP)2 








004 26 rou 


26 


07 






SHE 


DUTCH! 


CO IF ECHO 




00)47 


FD97 


A6 


84 


4 PSTRMO LOA .X 


GET A CHARACTER 




00429 PD)6 


IS 


96 


10 




PULS 


A,B,X,PC 


RESTORE 4 RETURN 




00)48 
00)49 
00))0 
00))1 


FD99 
FD9B 
PD90 
FD9F 


84 

AD 

2A 


?F 
BR 
N 
F6 


2 AMDA I97P 
7 BSR OUTCHR 
6 T5T ,X« 
1 BPL P6TRMC 


MASK OFF 
DISPLAY IT 
HAS IT LAST? 
LOOP IP NOT 




004)1 
004)2 








• CONSOLE OUTPUT ROUTINE 


t 




004)1 








• 








* 


00))2 


POAI 


39 




) RTS 






00434 








• BNTRY REQUIREHENTSi 

■ 


A - CHARACTER TO BE 

OUTPUT TO CONSOLE 


* 
■ 


00)) 4 














0041) 








00416 








■ 








• 


00))) 








• PRINT CR/LP ON CO 


SOLS 


i 


00417 








• EXIT 


COMDITK 


• 


00))6 








■ 




a 


00416 








• 




EXCEPT C 


• 


005)7 








■ ENTRY REQUIREMENTS! NONE 


■ 


004)9 








* 








* 


0O))6 
00))9 
00)60 








* 

• EXIT CONDITIONSt 

• 


ALL RECtETERS PRESERVED 
EXCEPT C 


■ 


00440 
00441 PO 


14 


16 


6 


OUTCHR 


PSH8 


A,a,x 


SAVE REGISTERS 










■ 


00442 FMA 


BE 


A06B 
02 


6 

2 


OUTCH1 


LOX 
LOB 


cocci 

6HRITFN 


POINT TO OUTPUT DCS 
SET FUNCTION 




00)61 
00)(2 








■ 




' 


0O443 FD5D 








00444 F0)P 


&D 


2 


7 




BBR 


REOIO 


OUTPUT THE CHARACTER 




0O)«) 


PDA2 


34 


02 


) CRLF PSH6 A 


SAVE A REGISTER 




00445 FD61 


15 


N 


10 




PUIS 


A,B,X,PC 


RESTORE REGISTERS t- RETURN 


00)64 


POA4 


Ht> 


(IP 


2 LOA ICR 


OUTPUT CR 






















00)6) 
00)66 
00)67 


POA6 
FDAt 

FWMl 


N 
M 


60 

DA 
CO 


T BSR OUTCHR 

2 LDA ILP 

3 BRA OUTC8R 


OUTPUT LP 4 EXIT 




00447 
00446 








• PCH FORM I/O RB04IIBT8 


* 




'68* Micro Journal 
























1fl 





00569 
















••• 00688 


FE6B 


Bl 


9E 


3 CMPA 


I*' 


BACKING UP7 


00970 








• SAVE 


PROGRAM ON TAPE 


• 00689 


FE6A 

rite 


M 
M 


D3 
11 


] BNE 
7 LEAK 


NEMBCl 


LOOP IF NOT 


00571 










*■■ 00690 


BACK UP 2 


00*7? 


FDAC 


10 


30 


> TSAVE 


m 


CETHX 


GET START ADDRESS 


00693 


Ffjta 


70 


d 


J BRA 


HKMEC1 


COHTINUB 


0QS73 


fdae 


If 


OE 




ito 


T5AVE2 


GO IF NONE 


00692 


FE70 


H 




5 HEHEC3 RTB 






0057* 


fdbo 


i\t 


A05B 1 




STX 


BECADD 


SAVE START 
















oom 


fob 3 


am 


29 




MR 


CETHX 


GET END ADDRESS 


00694 














0057* 
00577 


FOBS 
FOB? 


H 

f r 


04 
A05B 




■ HE 
LDX 


TSAVE 1 
SEGA 00 


GO IF ENTERED 
DUPLICATE ADDRESS 


00695 
00696 
00697 








* CO TO ADDRESS 


* 


oo578 


fdba 


K 






IMGt 




SET AOORB6S INDICATOR 


FJC71 


JOF 


A09C 


7 CO LDS 


8TRPTR 


SET UP STACK 


00 5 74 


ran 


hr 


A09A 1 


i TSAVE) 


BTX 


EHDADD 


SAVE ENO 




FET5 


BD 


FD12 


B JSR 


CBTMEK 


GET TARGET ADORES8 


00 MO 


FCflE 


ae 


A06E ( 


i TBAVE2 


LDX 


C0DC6 


SAVE CONSOLE PCB 




FE7* 


11 


02 


3 BED 


Col 


CO IF NOHE 


0058) 


roci 


M 


12 




PENS 


A.X 


8 AVE TERMINATOR TOO 


00700 


FE7A 


kF 


f.K 


6 BTX 


10,8 


STORE IN PC ON STACK 


00 58 2 


FDC3 


11 


A070 




LDX 


TPDCB 


BET UP FOR TAPE 


00701 


TE7C 


At 


K 


4 COl LDA 


,8 


SET 'E' FLAO» IN CC 


0058] 


PDC6 


ii 


A06E 




STX 


CO B 






FE7| 


a a 


M 


7 ORA 


4880 




005*4 


roc9 


10 






T6T» 




ANY ADQRE5B ENTERED? 




FEIO 


A7 


84 


4 STA 


,8 




?g';9 c . 


foca 


n 


02 




6E0 


TSAVE J 


CO ir NOT 


067 04 


FEB 2 


3* 




15 INTRET RTI 




LOAD REGISTERS AND 00 


05*6 
005*7 
005** 
005*9 
00 540 


FDCC 

n* i 

FDDC 
FDD2 

FDD4 


ID 
II 

P. 


13 

02 
00 
04 
39 


i TSAVE 3 


BSR 

PUIS 
CHPA 
SHE 

LP* 


SAVE 
A 

ICR 

TSAVE4 
♦ '9 


SAVE TNE PROCRAN 
CET TERMINATOR 
WAS IT RETURN? 
00 IF NOT 
OUTPUT 39 RECORD 


00706 
00707 
00708 
00 709 
















* 




• BREAKPOINT 


JS0F7VARE INTERRUPT) TRAP * 




FEB3 


AE 


6A 


6 BRKPNT LOX 


IQrS 


GET PROGRAM COUNTER 


00591 


FDD* 


9fJ 


54 




BBR 


OUTSN 




00710 


Ft* | 


u 


r 


5 LEAX 


-1,X 


DECREMENT BY 1 


00592 


roo* 


IS 


10 < 


i TSAVE 4 


PUIS 


X 


RESTORE OCB POl TER 


00711 


PEJ7 


*lF 


§A 


6 STK 


10.8 


REPLACE ON STACK 


0059] 


foca 


H 


AG 61 < 




STX 


COOCB 




00712 


FEB9 


C6 


FF 


I LOB 


IIFP 


PI AG FOR B I HOLE REMOVAL 


00*9* 


FDDD 


19 






RTS 






00713 


FESR 


BD 


FF43 


B JSR 


REHBK 


REMOVE BREAKPOINT 


00596 
00597 








■ GET 


HEX NUMBER IN X 


••• 00715 
* 0071* 








■ INTERRUPT 


<HARONARE/SOFTVAREI TRAP • 


0059* 
00599 


root 


"IE 


rou i 


CETHX 


JHP 


CE HEX 


RE1ATIVE BRANCH BOOSTER 


'•• 00717 
00718 
00719 


FtBE 

rtn 

FBtS 

FE97 


10FF 
«D 

7E 


A09C 
FDA2 
3C 
FC3A 


7 TRAP STS 
* JSR 
7 BSR 
4 JHP 


STKPTR 
CRLF 


SAVE STACK POINTER 
BEGIN NEW LINE 


O06O1 
00602 








• SAVE 


A PROCRA [N HEX 


»•• 00720 
• 00723 


RBCDMP 
G ETC MO 


DUMP REGISTERS 
CET NEXT COHMANO 


0060] 
00604 
00605 








• 






SAVE AOORBSSEB ARE IN 
■EGA09R 4 EMDADDR 


• 00723 

* 00724 

* 00739 

• 007 26 




















• ENTR I nivuinLmniB 

■ 








" REGISTER EXAMINE AND CHANCE • 


00606 
00607 








■ EXIT 


COMOITlOHSl ALL REGISTERS C HGED 


FE9A 


80 


PD44 


8 RECEC JSR 


INCHR 


GET REGISTER O EXAMINE 


0060* 








■ 








* 007 27 


FE90 
FEAO 


BD 
5F 


F0A2 


8 JBR 

2 CLftB 


CRLF 


BEGIN NEW LINE 


00609 










■ •■ 00728 


CLEAR OFFSET COUNT 


00610 


rod 


Mi: 


A05B < 


SAVE 


LOX 


BBC DO 


POINT AT FIRST BYTE 


007Z9 


FEAt 


BE 


FEC7 


3 LOX 


IRECIDS 


POINT TO REGISTER ID STRING 


006U 


FDE* 


r*, 


31 


SAVE1 


10* 


I'l 


BEGIN NEV1 61 RECORD 


00730 


rthi 


Al 


6« 


5 RECEC1 CHPA 


6.X 


CHECK REGISTER NAME 


00613 


FDEi 


«(> 


44 




•SR 


otrrsM 




00731 


FEA6 


27 


07 


3 BEO 


RECBC2 


GO IF FOUND 


00613 


FDE8 


7P 


A057 i 




CLR 


CR6UH 


IN IT CHECKSUM 


00732 


FEA6 


9C 




2 INCS 




ADVANCE COUNTER 


00614 


FD*B 


F* 


A09A 4 




LOO 


EMDADD 


CALCULATE BYTES TO SAVE 


00733 


FEA9 


CI 


OB 


2 CHPB 


111 


END OF LIST? 


00615 


fDEE 


<* 


10 4 




FSNS 


X 




00734 


FEAR 


13 


T- 


3 BLS 


RECBC1 


LOOP IF NOT 


00616 


FDFO 


A | 


El 1 




SUBD 


,s++ 




0O7 35 


FEAD 


10 


.4 


3 BRA 


RBCDMP 


BAD ID - DVHP ALL 


00617 


FDF3 


■at- 






TSTA 




GREATER THAN 2*9? 


00736 


FtAF 


H 


M 


5 RKC8C2 PSHS 


B 


SAVE OFFSET 


0061* 


rOF3 


ji, 


04 




ONE 


SAVE 2 


00 IF YES 


00737 


FEB] 


&D 


37 


7 BSR 


RDUMP 


DISPLAY TNE REG 4 CONTENTS 


00619 


FOF5 C I 


10 




CMPB 


111 


LESS THAN FULL RtCORO? 


067J* 


FEB1 


RD 


FD12 


6 JSR 


GETHEX 


CET NEW VALUE 


00670 


FDF7 


II 


02 




BUI 


5 AVE 3 


CO IF YES 


007]9 


FEB* 


H 


04 


5 PUL 


8 


RESTORE OFFSET 


006J1 


TPF9 


CI 


OF 


! 6AVE2 


LOB 


• 15 


SET FULL RECORD SIZE 


00740 


FEB* 


11 


K 


3 BEO 


REC8CX 


CO IF HO CHANGE 


00622 


PDF* 


9c 




1 SAVE3 


INCB 




CORRECT R|C RO SI£E 


00741 


FEIA 


U 


k\ 


S LEAY 


BrY 


POINT TO REG ON STACK 


006 2 3 


FDPC 


Lf 


9B ( 




TFR 


B.A 


OUTPUT RECORD SIZE 


00742 


FEBiC 


G 1 


01 


2 CMPB 


• 3 


SINGLE BYTE R6G7 


00624 


FDFE 


«h 


03 




ACOA 


13 


ADJUST FOR ADDRESS. COUNT 


0074 3 


FEOE 


IF 


]n 


6 TFR 


X,0 


CET NEW DATA IN A,& 


00625 


VEOO 


10 


20 




BBR 


01FTBYT 




00741 


FECO 


a * 


1 1 


1 BLS 


RBGBC3 


00 IF SIN LE 


0O626 


FE02 


H 


10 e 




P6HB 


X 


ADORES 6 TO STACK 


0074 5 


FECI 


AT 


KV 


6 BTA 


1 V* 


STORE HS HVTE 


0O627 


F104 


|| 


02 




PULB 


A 


OUTPUT ADDRESS HI 


00746 


FEC4 


B7 


A4 


4 RECEC3 STS 


r Y 


S ORE L8 BYTE 


006 2* 


feob 


M 


1A 




BSR 


WTBYT 




007*7 


FBC* 


39 




9 RtCNCX RTS 






00629 


FEOi 


11 


02 ! 




PU 8 


A 


OUTPUT ADDRESS CO 
















00630 


FED A 


M 


16 




BBR 


OWT6Y 




00749 


FECI 




43 


REG IDS FCC 


■CABDXXYVUVPP' 


006 31 


F60C 


M 


•0 


i SAVC4 


LOA 


,x* 


SAVE A DATA BYTE 




FECB 




41 








00632 


FEOt 


en 


17 




BBR 


OUTBtT 






FEC9 




4/ 








00633 


FF.10 


%A 






DBCB 




LOOP UNTIL 




FECA 




44 








00634 


Fill 


M 


F9 




BNE 


SAVE 4 






FlC* 




5B 








00435 


FE13 


*'► 


A057 




LDA 


CXSUM 


GET CKSCKSUM 




F8CC 




5* 








00636 


FE16 


-1 I 






COMA 




COMPLIHEHT IT 




FECD 




99 








00637 


FE17 


M 


09 




BSR 


oirruvr 


OUTPUT IT 




FECE 




59 








0063* 


FE19 


31 


IF 




LEAY 


-i.x 


CKKK FOR ENO 




FECF 




55 








00*39 


FftB 


JDBC 


A09A 




CHPY 


ENOADO 






FEOO 




55 








00640 


FEIF 


26 


C3 




QNB 


SAVE1 


LOOP IF HOT 




FED I 




14 








00641 

00643 
00644 


FE31 


>9 






RTB 








FED2 




50 














• OUTPUT BYTE AS HE* 


AND ADO TO CHECKSUM. 










• COMPLETE REGISTER DUMP ■ 


00645 










■" 00753 








00646 


FK23 


60 


FD7 


> OUT8YT 


JSR 


OUTHBX 


OUTPUT BYTE AS HEX 


00754 


FE03 


BE 


FEC7 


3 RECDHP LDX 


IRECIDS 


POINT TO ID STRING 


00647 


FB25 


bb 


A057 


> 


AO&A 


CK5UM 


ADD TO CHECKSUM 


00755 


FE06 


SF 




2 CLRB 




CLEAR OFFSET COUNTER 


0064* 


FE2B 


07 


A057 


I 


STA 


CRSUM 




00756 


FEO? 


A6 


85 


5 RCDMP1 LDA 


!•« 


GET REG NAHE 


00649 


FE2B 


39 




J 


RTB 






00757 

0075* 

!•• 00759 


FE09 
FEDS 
FEOC 
FEDS 
FKEO 
FEE2 


BD 

K 

C3 
23 
86 

*D 


OF 

OB 
P7 
93 
IB 


7 BSR 
2 :mcb 

2 CMPS 

3 BLS 
2 LDA 
7 BSR 


ROUNP 
111 

RCDNPI 

I 1 * 

06P10 


DISPLAY IT 
8UHP TO NEXT REG 
ALL PRINTED? 
LOOP IF HOT 
DISPLAY STACX ID 


00661 
00692 








• OUTPUT 4 B* 


TAPE RECORD HEADERS 


• 00760 
»•• 00763 


00653 
00694 


F|2C 


rh 


FDA2 


i OUTSN 


JSR 


CRLF 


BEGIN NCN LINE 


00762 


00659 


FE2F 


II 


53 


I 


LDA 


I'S 


OUTPUT *8' HEADER 


00763 


FEE4 


1036 


A090 


4 LDY 


ISTKPTR- 


12 Y+BoBTXPTR 


00656 


FE31 


n 


02 


t 


BBR 


UTC 




00764 


FEE8 


20 


OA 


3 BRA 


RDUHPI 




00657 


FI33 


If 


9* < 




TFR 


B.A 


RECORD TYPE TD A 


00766 
















• DISPLAY REGISTER CONTENTS ■ 


00659 








* OUTFUT CHARACTER TO CONSOLE 




PBBA 
FEEG 


ao 

10BE 


13 
A05C 


00660 


7 RDUHF SSR 
7 LGY 


DBPID 
STKPTR 


DISPLAY REGISTER ID 
POINT Y AT STACK 


00661 
00662 


FB35 


7E 


FD5Q < 


i ovitc 


JHP 


OUTCHR 


RELATIVE BRANCH BOOSTER 


*•• 00769 
00770 


















00771 


FEFO 
PBP2 
FCF4 
FEF6 
FEF9 


C) 
23 

A6 

BD 
VC 


03 
06 
AS 
FD70 


2 * CHPB 

3 BLS 
5 RDUMPl LOA 
B JSR 

2 I CA 


13 

RDUMP2 
B.Y 

OUTHBX 


SINGLE BYTE REG? 
GO IF YEB 
DISPLAY HB B>YT£ 


00664 
00*65 








* HEHORT EXAMINE AMD 


CHANGE 


*•• 00772 
• 00773 


00666 
00667 


FE30 


PL. 


A4 1 


NEMEC 


BSR 


CETHX 


CET ADORSBS 


••• 00774 
00775 


ADVANCE OFFSET 


0O6SB 


FEJA 


M 


03 




BNE 


HBMEC1 


CO IF GOOD 


00776 


FEr* 


At 


AS 


5 RDUHP2 LDA 


B.Y 


DISPLAY A BYTE 


00669 


FE3C 


AF 


A052 




LOX 


HEMPTR 


USE PRBVIOUB 


00777 


FEFC 


HI 


F07 3 


4 JHP 


DSPBBY 




006 TO 


FBJF 
FEU 


HF 

w 


A0S2 1 
FOA2 


i NEMEC1 


BTX 
JSR 


HEMPTR 
CRLr 


UPDATE RAM POINTER 
BEGIN N£H LINE 


00779 














00671 








0067 2 


FL4S 
FE4T 


IF 
ID 


10 < 
F06A 




TFR 

JSR 


X.D 
DSPDRY 


DISPLAY ADDRESS 


00780 
00781 








• DISPLAY REGISTER ID 


00673 








00674 


FE4A A* 


BO < 




LDA 


«x* 


GET CONTENTS 


00782 


FEFF 


ID 


02 


7 DSP ID BSR 


OUTCH 


DISPLAY REG NAnE 


006 7 5 


FE4C 


HD 


F073 




JSR 


OSPSRY 


DISPLAY THEM 


0O7B3 


FF01 


86 


3D 


2 LDA 


• '- 


DISPLAY '>' 


00676 


FE4F 

FES J 


If 


32 

BO 




TFR 
BBR 


X,Y 
CtTKX 


SAVE ADDRESS EN T 
GET CHANGE DATA 


00785 














00*77 








0067* 


FS53 
rE55 


IE 
J? 


03 
09 




EXG 
BEQ 


* H8C2 


SAVE DELIH, GET NEW 
CO IF NO CHANCE 


0Q7B6 
00717 








* outfit: character to console 


00*79 








006*0 


FE57 


11 


3F 




■T» 


-l.Y 


UPDATE MEMORY 


00788 


PF0 3 


7E 


FD9B 


4 OVTCH JMF 


OUTCHR 


RELATIVE BRANCH BOOSTER 


00611 


FB59 

me 


I', 
If 


JF 
03 




CNFB 
BEO 


-l.Y 
HEHEC2 


VERIFY GOOD STORE 
CO IF GOOD STORE 


007*0 














006*3 








006*3 


FESD 
FE60 


m 
if 


rc*j 

10 < 


i mtnici 


JSR 
TFR 


ERROR 
X»0 


DISPLAY ERROR 

CET DELIMITER IN A 


00791 
00792 








* BET A BRIAR* 


I 


00614 








00665 


FE62 


IF 


21 < 




TFR 


YrX 


OET NEXT ADORBSS IN X 


00793 


FF06 


BO 


FBI 2 


B SBTBX JBR 


CBTHEX 


GET ADORBBB 


006*6 


FE«4 


«1 


00 




CHPA 


ICR 


END OF UPDATE? 


00744 


FF09 


27 


It 


3 BEQ 


DSPBX 


gO IF MDNE XVTEREO 


0060? 


FE66 


27 


01 




BEO 


HEHEC3 


00 IF YEB 


0O799 


rto* 


80 


27 


7 BBR 


IN1TSP 


POINT Y AT BP TAB B 


20 




























h &0' Micro Journal 



00796 
00797 
00*98 
00799 

0D«Q0 
0Q6QI 
00102 
0010 3 
00404 
0O8O* 
00806 

00808 
008 09 
00810 
008 LL 
00812 
0081) 
00614 
DOB IS 
008)6 
00817 
O0818 



FEW) 8C 
TTQT 27 

mi 80 
rpu 26 
ff!5 20 
rm hr 

PP19 27 

mo A6 
ffid A7 
ffif 86 

FP21 A7 



FP23 AD 
PP26 6D 
PF28 EC 
PPI* 27 
PP2C »D 
PP2P 6D 
FFll 26 
FF33 39 



A4 
06 
26 
Pt 
QC 
A4 
OB 
84 
22 
3P 
84 



FOA2 

OC 

M 

0) 

PD6A 

08 

Pi 



00820 

00821 

00822 

0011) PPD4 108E A034 

00024 PF3B 39 

00826 

mil 

00828 

00829 PP39 31 23 

ncmn ffjb 10BC A0S2 

00831 rrir 39 

0083) 
00834 
008)5 
O0B36 PP40 8D fOl2 



00838 

008 39 

006 40 

0QB41 PP4J BD 

0084 2 FF44 SO 

00843 PP46 27 

00844 FF4B AC 
00844 PP4A 27 

00846 PP4C 20 

00847 FP4E 80 

00841 rr%o 80 

00849 PP52 24 

00850 FF54 39 



0O842 

00643 

00854 

00864 PP55 AB 

00*5* PP57 27 

0065? rF49 A6 

oobsb rr%n *? 

OCB59 PP50 6P 

00860 PP4F 6P 

00861 TT61 )9 



008 83 
00864 
00865 
O0866 
00867 
00848 
00149 
00870 
0017J 
-XJ87J 
00873 
00874 
00875 
00876 
00877 



FF«? SP 
Pr64 AB 
FF66 44 
FF67 3 5 
FF§9 44 
PF6A 24 
PP6C 54 
rF6D 24 
FF4F 54 
PP70 24 
PP72 A7 
PP74 )9 



06 
A4 
09 
02 
05 
67 
PI 



A4 

OB 

13 
H4 
M 
21 



06 
06 



02 
84 



FB 

01 



84 

02 



00879 PP75 66 
00860 PP77 54 
00661 FF7B 24 
00882 PP7A A6 
0068 3 PP7C 39 

00885 FPTO E6 

00886 FF7P C5 
00187 PP81 27 
00886 FPU A7 
00669 PP65 39 



00891 PPB6 A6 84 
00693 FPes 84 0) 
0089) PP6A 39 



0OB95 
00896 
00197 

00898 PP8B 
00819 FP6C 
OOfOO PP80 

00901 ffbf 

00902 PP9Q 

00903 PP92 

00904 FF93 

00905 FP95 
OOf 04 FF96 

00907 FF9B 

00908 PP99 

00909 FF9B 

00910 FF9C 
009 |J FF9* 

00912 FF9F 

00913 PFAI 

00914 FFA2 

00915 FPA4 



01 

40 

PE3# 

47 

PC71 

4C 

FCB1 

53 

PPAC 

62 

FK9A 

42 

PP06 

55 

PP40 

4A 

cooo 

FF 



5 BETBK1 


LOO 


,Y 


EMPTY SLOT? 






880 


SETBK? 


CO IP YES 






88* 


HEXTBP 


ADVANCE TO MB XT 


SLOT 




BHE 


SETBK I 


LOOP IP MOT ENO 






HI-* 


8P8R 


EKIT 




5 BBTBK2 


STX 


,Y 


SAVE A0DRESS 






fQ 


06F6R 


GO IP ADDflEIB - 







tm 


rX 


06T CONTENTS 






STA 


2,Y 


BA E IN TA8LE 






LOA 


46 3F 


WI OF C E 






STA 


.X 


SET BREAK 





* DISPLAY ALL BREAKPOINT?; 



OSPBK JSR 
BSD 

OSPBKI LDD 
BEO 
JSR 

D8PBR2 BSR 
BHE 
RTS 



CRLP 

INITBP 

,Y 

OSP6K2 

DSPDBY 

Htxnf 

OSPtlKI 



BEGIN HEW LINE 
POINT Y AT BP TABLE 
OET ADDRESS OP BF 
GO rP INACTIVE 
DISPLAY ADDRESS 
ADVANCE POINTER 
LOOP IF NOT END 



HlTIALUE BREAKPOINT TABLE POINTER 

JBPTARL POINT V AT 8P TABLE 



I ZNITBF LOY 

* RT* 



• ADVANCE BREAKPOINT TABLE POINTER 

5 NEXTBP LEAY 3.Y ADVANCE TO NEXT ENTRY 
4 CNPY PBPTEND CHBCK FOR END OF TABLE 
4 RTS 



• UNSET A BREAKPOINT 
6 UNSBK JSR OETKEX GET ADDRESS 



• REMOVE ONE OR NONE BREAKPOINTS 



7 


RZM6K 


BSR 


INITBP 


POINT Y AT BP TABLE 


2 


REMBKI 


TSTB 




REMOVE ALL? 


3 




BEO 


REMBK2 


CO IP YES 


6 




CNPX 


,V 


PINO ADORESS? 


1 




BEO 


UNSET 


CO IP YE8 


3 




BRA 


RENBK3 


LOOP IF NO 


7 


REMBK2 


BSR 


UNSET 


UNSET IT 


7 


REnBKj 


BSR 


NEXTBP 


ADVANCE POINTER 


3 




BNE 


REM8KI 


LOOP IP WOT END 


5 




RTS 







• REMOVE A BREAKPOINT 



5 UNSET 


LOX 


,Y 




BEO 


UNSETI 




LDA 


2rY 




VTA 


,X 




CLR 


o,v 




CLR 


lit 


4 mstri 


RTS 





GET ADDRESS OP BP 
GO IF INACTIVE 
CBT CONTENTS 
REPLACE BP 
NARK BP INACTIVE 



TERNINAL DRIVER (ACIA) 



7 TERROR 


CLR 


OCBERR, 


X MO ERRORS POSSIBLE 




LDX 


DC8IOA, 


X GET I/O ADDRESS 




L6RB 




READ FUNCTION? 




BCi 


TERMRD 


GO IF TES 




LSRB 




NRIT PU T1PN7 




8CS 


TERMWT 


CO IP YES 




LSRB 




STATUS FUNCTION? 




BCS 


TER ST 


CO IP YES 




LSRB 




CONTROL PUMCTION? 




BCC 


TERN1 


CO IP HOT 




STA 


rX 


STORE CONTROL COOB 


5 TERMI 


ATI 






4 TERMRD 


LM 


*X 


GET STATUS 




LBRB 




INPUT BIT TO C 




acc 


TCRfIRD 


LOOP IF NO INPUT 




LDA 


UK 


OET CHARACTER 




RTS 






4 TtRMWT 


LD6 


,x 


OCT STATUS 




Blfi 


12 


READY FOR OUTPUT? 




BCC 


TERHWT 


LOOP IP NOT 




STA 


l.X 


OUTPUT CHARACTER 




RTS 






4 TERMST 


LOA 


*K 


OET STATUS 




AND* 


13 


NASI OPP READY BIT 




RTE 







••••••••■••••••••••••••••••••••••••••>••••••••••• 

4 

ITEM ISMGYN 

MEMORY EXAMINE CBAMGB 

GOTO ADDRESS 

PROGRAM LOAD 

PROGRAM SAVE 

REGISTER EXAMINE/CHANGE 

SBT/PRlNT BREAKPOINTS 

UNSET BREAKPOINTS 

CALL 006 

CMO EWTItfEL 



CN0T6L PCB 


1 


PCB 


'M 


PDB 


MSNBC 


PCB 


4 Q 


POB 


CO 


fcb 


'L 


FPU 


TLOAD 


r:& 


*S 


**VB 


T«AV^ 


FCB 


■R 


™ 


REG EC 


FCB 


•6 


FOB 


SETBK 


PCB 


■u 


FOB 


UNSBK 


FC1 


'1 


FN 


scooo 


FCB 


IFF 



00917 








0D91B 








00919 








00920 


MV 




43 




FFA6 




4E 


00921 


FPA1 




FF62 


00922 


FPA9 




8004 


00923 


FFAB 




0000 


00924 


FPAO 




AC 48 


00924 


PPAF 




A04E 


00926 


FF81 




A051 


00927 


PPB3 




A05E 


00921 


PP65 




A05E 


00924 


PFB7 




PEBE 


00930 


FF89 




FE8E 


00931 


PF8B 




FES 2 


00933 


FPBD 




PCSE 


00933 


FFBF 




FtS3 


00934 


PFC1 




FE8E 


00935 


FFC3 




FC32 


00937 








00938 








00939 








00940 


FFC5 


6C 


9F A072 


00941 


FFC9 


«e 


9F A074 


Q0942 


FFCD 


6E 


9F A076 


00943 


FFD) 


6B 


9F A07B 


0094 4 


PFD5 


ft 


9P A07A 


00945 


PFD9 


6E 


9F A07C 


00947 








00948 








00949 








0O95O 


FFEO 






00951 


FFCC 




FD7 3 


00952 


FFC2 




rot* 


00953 


FFE4 




FD12 


00954 


FF86 




FD97 


0O955 


FFE8 




FD44 


00956 


FFCA 




F058 


00957 


FPBC 




FDC3 


00958 


FFEC 




PC32 



• RAM INITIALIZATION DATA 
RANINT FCC *CN' CONSOLE OCB ID 



FDB TERMDR 

PDB TSRMNL 

PDB 

FOB COMOCB 

FOB COMDCi 

FDB CGNDCb 

FDB CDNDCB 

PDB CON DCS 

FDB TRAP 

FD* TRAP 

FOB INTRET 

FOB TRAP 

PDB BRKPNT 

FOB TRAP 

FDB MOMENT 



CONSOLE DRIVER 
CON&OLI I/O ADDRESS 
ERROR STAT B. EXT 
OCB CNAIK FOlNTEf 
OCB POINTERS 



INTERRUPT VECTORS 



• INTERRUPT HANDLERS 



9 SWI3 JMP rSWIJV] 

9 SWI2 JNP ISWUV] 
9 PIRO JMP IFIRQVI 
9 1R0 JMP I1R0VJ 

ISX1V] 



9 SWl 
9 NM1 



JMP 
JHP 



SOFTWARE INTERRUPT 3 
SOFTWARE INTERRUPT 2 
FAST INTERRUPT' REOUEBT 
INTERRUPT REOUEST 

SOFTWARE INTERRUPT 
(NHIVI NONMASKABLE INTBRRU T 



■ SOFTWARE VECTORS 



ORG 


8FFE0 


FDB 


DSPSBY 


re* 


D5PDBY 


FDB 


CETMEX 


Fr;& 


PSTPNC 


ret 


INCHR 


FDB 


DUTCH R 


FDB 


MtOIO 


FDB 


MOMENT 



DISPLAY SINGLE BYTI 
DISPLAY DOUBLE BYTE 
CET HEX NUMBER FROM CONSOLE 
PRINT STRING TO CONSOLE 
INPUT CHARACTER 
OUTPUT CHARACTER 
FERFORN I/O REQUEST 
RONITOR RE-ENTRY 



PERCOM DATA CO. COPYRIGHT <C) 1979 

H6800*H6409 CROSS-ASSEMBLER >.0 
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00960 






00961 






00962 






00963 


FFFD 


FCOO 


00964 


fff: 


pre 4 


00965 


PFF4 


FFC9 


00966 


Pff« 


FFCD 


00967 


prrs 


FFD1 


00966 


FFFA 


FFD5 


00969 


FFFC 


FF09 


00970 


FFFE 


FCOO 



• HARDWARE VECTORS 



FOB 


IN1T 


POB 


SWI3 


FOR 


SW12 


PDB 


FIRQ 


FO* 


1R0 


FOB 


BWI 


FDA 


NNI 


>'LiP 


INIT 



RESERVED BY MOTOBOLA 
SOFTWARE INTERRUPT 3 
SOFTWARE INTlftRVPT 2 
FA&T iNTtRRUFT REOUEST 
INTERRUPT REOUEST 
SOFTWARE INTERRUPT 
NON-HA&KAftLC INTERRUPT 
RESTART 



TOTAL ERRORS 00000 
TOTAL WARNINGS 00000 



•••• SYMBOL 
BEGADO A04B 
CXSUN A057 
COMF2 FC7P 
DCBAPP 00 OA 
DC& IDA 0006 

dsfid rcrr 

GETCMO PC3A 

COl FE7C 

INKEX3 F041 

IRC FFD1 

LOAD 3 FCDE 

HCMEC FEJ8 

NEXTBP FFJ9 

OUTCK1 F05D 

outsf ro74 

RDRON 00 41 
REGB A02A 
REG EC 2 FtAF 
R8GX A02C 
RBQ10 PD43 
SAVE FDE1 
SEftCNl FC66 
STACK A028 
SMI 3 FFC5 
TERMRQ FF75 
TSAVE FOAC 
UNSET FF55 



TABLE 

BFTABL 

CNDTBL 

COM PAR 

DCBCHN 

DCBLNK 

DSPSBY 

G£THEX 

INBYTE 

INIT 

tROV 

LOAD! 

MEHBC1 

NKI 

0UTCNR 

PROMPT 

RZVHF' 

RBGC 

REG EC 3 

REGY 

RESET 

SAVE] 

SERCHX 

STATfN 

SWI3V 

TERNST 
TSAVE I 

UNSETI 



A034 
PF81 

FC74 
A068 
0000 
FD7 3 
FD12 
FCF8 
FCOO 
A078 
FCEB 
FE1F 
FF09 
FD48 
FC4E 
FEEA 
A028 
F8C4 
A02E 
0003 
FDE4 
FC7J 
0004 
A072 
PF86 
FOBS 
FF61 



BPTEMD 
CNTLFN 

CONDCB 

DSPBK 

ENDADD 

GETMX 

INCHR 

INIT1 

LF 

LOAD 5 

MEMBC2 

NHIV 

OUTCNX 

PSTRltG 

RDUHP1 

RCGD 

RBGCCX 

RtMBX 

RE5TRT 

SAVE 2 

SETBK 

STKPTR 

SN[V 

TERHWT 

TSAVE 2 

UBRTBL 



A052 
0008 
A04E 
0002 
FF23 
A05A 
FODE 
FD44 
FC06 
000A 
FCFD 
FE60 
A07C 
PD79 
097 
PEF4 
A028 
FEC6 
FP43 
A07E 
PDF9 
FF06 
A04C 
A07A 
PF7D 
FDBE 
A054 



8RXFWT 

CODCB 

CONFIG 

DCBOVR 

DSFBfll 

ERROR 

CETKXl 

1NHEX 

INIT2 

LOAD 

LOADX 

PI IN EC 3 

OUT BYT 

OUTDIO 

RAM 

RDUHP2 

REGOMP 

UOtCN 

RENBKl 

RCDMP1 

SAVE) 

SETBK 1 

SW1 

TERMI 

TLOAD 

TSAVE 3 

WRITPN 



FEB 3 

A06C 
0011 
0Q04 
FF2B 

rcB 2 

FD16 
F 2D 
PC 11 
FCB 7 
FCF? 
PETO 
FE22 
F06R 
A000 
FEFA 
FE03 
FEC7 
FF45 
FED? 
FDFB 
FFOO 
PFD5 
FF74 
PC81 
FDCE 
0002 



CEDCB 

CR 

DC&ZRR 

DBP8K2 

ring 

CETNX2 
1NHEX1 
INTTBP 



LOOK1 

NENPTR 

OUTC 

OJTHEX 

RAM INT 

REAOFU 

RECEC 

RECF 

R EHBX 1 

RON1 

SAVE4 

SETBK? 

SNU 



TPDCB 
TSAVE4 



A06C 
A056 
0000 
000B 
FF2F 
FTCD 
FD2S 
F03B 
FF34 
FCB9 

rc»3 
Mia 

FE35 

FDTD 
FFA^. 
0001 
FE9A 
A032 
FF4C 
FCOO 
FEOC 

rrn 

FFC9 

rr«2 

A070 
PDOB 



C1DCB 

COMF1 

CRLP 

OCBBXT 

DBPDBY 

PIRQV 

GO 

1NHEX2 

INTRET 

LOADS 

LOOKUP 

NONENT 

DUTCH 

OVTSN 

ROROFF 

REGA 

RECEC 1 

RBGU 

RENBK3 

ROM? 

SEARCH 

SF 

EW12V 

TERMNL 

TRAP 

UNSBK 



A06A 
PC76 
PDA? 
0009 
PD6A 
A076 
FE71 
FD3F 
FIBS 
FC8C 
K54 

rcaj 

FF02 

TtK 

oon 

A02! 

RM 

A03C 
FF5C 

raoi 

FC6* 
0024 
A07* 
800* 
FEBI 
FF4i 
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TRANSLATOR PROGRAM ILlVATES FERDOM LFO^lOO 1 * TO UNIVERSAL MIHI-DISK SYSltR 

0*rl»nd r TttM * Oetob«r 3. 1979 * HArolfl Mauch, pr««id«nt of 
Percoa D«tB COAPtny , BnAoune«d htf« todAF that tfi# company Is now 
21 






offering ft translator prograa which convert ft rilee on aoft-aectorad 
alnLdlskettee for uee with Pereoa LFO-^OO 1 " hard sectored alnl-dlsk 
drive system*. 

T»»e Program, cilltd SOPTRA"*" 1b ivillibli 1* version* to 
convert riln operating under mini tULt] PL£X 2.0* and Smoke Signal 
Broadceotlng Company 'a D03. 

Tt»a algnir leaner or 30PTHAH." according to Kauch , la that It 
•akee the Percoa LfO-AOO** a unlveraal alnl.dlak storage eysteen 

Neuch said no* alnldlokettc progrufl Trem all or the principal 
6800 eortwere suppliers — Technical Sy stoma Conaultanta (T3C), 
Compute rear*, Ed Salth'a Software korke and of course Prreoai -- 
nay dp uaed with the UB-IOO*" 

SOFTKaN*" eoploa eort.aaotored alnldlokeitee treck-for-treck 
onto hard-sectored ulnldlakettes, £f the minidiskette Lncludan a 
PLEK* or SSB POS, the DOS la Modified to function ulth the Percoa 
LPD-tflO^ 

tranalatlon of alni Pitt* and SSB 008 alnldinket tea reaglta In 

more than 10ft additional atorage apace becoming available than required 

for Che eon-eectered veralon. 

&onRAM Km la aupplled on a alnldlakatte alona with ul llltlee 

for 12*. 9S. a usero annual la IneluOad. The uaer anjet Indicate 

whether SOPTP-AX** la to be und Tor elnl FLKx! FLEX 2.0* or 35* DOS. 

Ordera ror SOPTRAtf*" may ba placed by calling fercoai toll-free 
on 1-8O0-527-159? , and atay be paid by check* aoney order, COO or 
charged to a Vlaa or Master Charge account. Teaaa realdenta awet add. 
$t ealoo tax, 

Dealer ln<lutriee are Invited, 



tai trademark of Pereoai Oats Coapmy* inc. 

f trademark of Technical Syotaa* Conaultanta. Inc. 
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ftfwttal ItlClim Cem«ilt4nli A«k 4t\m***n*.td iM flrti Ia $ uwa «tf 6109 *ltitmn Mftwira. 
I*ma1*v for IfM SWl* (S09 kttlom, tt»» fc>h»«/f «*!**•* 4 M09 vwa* af Ik* aepuljr 
fU*" **» •et»*ci<* »»!•». « (Ml •*IU*. 4 mldol motUii, a fill KAS4C jMa/prna,. 
Mi 4* «*»*•** l**»*ffa «tt*| paUa|i. 

71* «t09 «***» el RXX Ik «l«Mti Mamie* k* ia> atOO ««nte» o«4»i fer ilk Jautta* el 
COCO «a Off? ht>. IKu «*>•**• '•<** ■**" **<.*•** DrtiiM forOIQOfUA t«* to rt*)»e*&M 
r«r«aoa vy »•**•<? t*a*i'« **r eawiin <■!* >u* ia •*» e»fle»r «eemtt* OCA rMt«*r«t 
mhdi #r»«iwc rn» Sko<«i«an, im<m «nd «^im«iOi; ran, priMier iftMUH. **■<!> <** 
type {woa/M« inxty, latemjtu ip*t* io«npi«i\laft, at»r «(j/mp Ulfllr. *rvi l»tUv, it tor 

"IHIl|lk 

1*4 ImI «e<l*t ** inotoi ••< ****** «*lh Ikf H£X H<*i4« Itii M»f e» awi*i*Md 

HavM*tr. tn» ^e>i«r u •* —a*™* «>m<w •» i^k ammm isc i*» i*tt l*n«« 

W>»«*«. II Ik km »*6 coKttfii *r*mf4 wia cKw«im «ik«|, l«««|, «j* t*^* 1 

bi»tr*<iiMW Hh ^Mie>*i ««ov j»M»ae« n e> j a m pn*if«t im itumtunM Mt*«air> it 

Ki^ll aiOt, 6804 aai i**l flNiwMnict to I hit iintint i fi»jrt c*a to) linneiiit^v 
(Uti*fnfato4 I* C«4lHf 6109 •fel'tl cw3», 

Tlia |A5lC It J wvOr n»l «rt««i^»l»f »»lh 6-<J«|(i ptK»ktan la III bl**rv ng*U»l pot\i 
mil** pm«j|k hidm IlklwCr r«n#«m u<m tltoi m fK*r4 I/O uat »lf(tja trr*jt. 
umkmi\M4 M'*% tw«lku I*/ 1 *w»#** COM4 met, TkACC* Oft IMDK COTA <■> e> O t^-^ 
j***f *. «*d i r«MMii« fi&flur. *J*» i.t^e*ruri n j tCMfnJ 4a*iM4l «*iick elfecai v< 
i w in ai i. tOT^*«* f*«ip» w im »ee<t* «i e>«i «a«ia »*• eKr to imvtw to * 9km 
<*»«•««. hui 9*rwlt* tto *»iraMlton of pr»P*Mt*r> #asic e/"|fe*<*< 

t>M d«bu| 9*<**f »» a peavrful (vol imt <i»*i»Wr tiA|k»i|» pf<e/Mf) feOvlllf* 4*** to* Of" 
LtrnwUiCv ilM««KU«Al el «to 6109 CfVJ HVilw*^ lalvrlvm u* I/O oprrtiloM. atojltifto) 
6»aai**lnh may at M*r*«th(«*e ape i*vv to («naitka«at a» twaraf c/1ia«1t» Tr«<M« li 

atiuati h u w^e ♦» «*rfi*pM tiapp*i«A. a «u«»e*U' itaiwi eto*i tto mm «r ito 

»re«*a«4 *J5 raM«tad ln»l«wt1M*«> ■to»»n> P»»laHto» ^«T to a*ataM H* aketllete Meckt a# 
tto Mmt **m«. bw^ lf*i«rn Mthrtf * mimi*§nttmhm, J m — Baif. iwwar y aimUM 
•Mi (^«<*|a, km ^alaarfAlaf, «n« • ..m^m ttik» immIh. 

Eaiapi forH^X, all cee> 11 Uttf raanlraivt antf psill^en Intftptwetni, HI» II *>*#***« 
l*i (to UrPi ill irtlmi •» * \ w I in*h Akt. Tha athar taflvat n tfHiaii «n * 

knna«re ImI **»»a Wi «u •«4«i» *v«y h* wh« •* *«r HiHKMfa eaOf ru> #«» 

kVlMP. CttMIH nnm-i |.ll*i r«lrmie l|4tltfM| 4J« ****** t*t W hi fUK> 
CaMict THtorffcal Sr*mw Ce»iMlia«K toiMX let ?S7t «%•! Lifav«i*a. IN 47904 
(117) *»J-J40i tor «i**itof ttiaUk 



.<.w,SDFTUJflRE UJ0RH8 



Saptaaber 26* 1979 



Mr. Don «lllia*>a 
•Sfl «ioro Journal 
3014 Kamlll Road 
Hixaon, TK 373U3 

Oeax Ooni 

I eant to tha^ you and Mr. Robert ao/d for tha vary nice coa - 
■ante on our Diaaeaaaibler/source Oenerator program in tha Sapt- 
•mbir latua and to Lnfof* your raadera that It la atill avail - 
abla «a M&dSO on caaaette (i.2jj or alnl floppy <$30.95). It 
ia avallabla on SSB. Klnl-Plex (TM) or Flex p.O format directly 
fro* ue< or in Percoa format from Parcom. It la alao available 
directly from Stoke Signal, *■ p ogram SC.l. 

Tha Relocatable Dleaaaamblar and Segmented Source Text Genera- 
tor (XoSRS) aintionad In Kr. Boyd 'a article is an iaprovad 
tin capability) varelon for use in conjunction with any of our 
aelooetabla Aeeaablar programa. It it furnlahed In ralocatabla 
objact ooda and roquirai tha linking loader (part of xhe aa- 
eeabler packaga) for uai . In prloa la 135 on cuaatte or 
3U0.95 on mini floppy and tncludea an annoted aaaembler llat- 
ir*% of the program. 

Tha caeaetta veralona are delivered with the dlek auproutlne 
calla linked to Saoaa Signal 00568 antry polnta. Per tuna taly. 
there are enough alaUarltlea between Plea and SSB that to 
change to a different 305 it ia only neceeiary to ohange the 
SSB SOS addreaa in tha dlek aubrouUnae to aquivalont addraa* 
In olther flex 2.0 or alni-^lax. only 5 diffarant addraaaaa 
are uaed. Theae are* 

tOJIl fiat MX 2.0 

?8D6 bUd$ 

71 3C A03P 

7127 AD?D 

7115 ADIB 

7740 A*>»0 

Tha only other ohange required ia In (ha function coda for "Opan 
to Write* from 01 to 02 and for *Cloae Pile* from 03 to 0» and 
raaova (t*CP> the Increment of tha function coda ( l*x 0.x) after 
the SSB "Open to Write" la performed. 

Yours truly, 



SSB ,HAMg 


y mt "friff 


S5.B 


OK* 

4TTPB 

2PLSPC 

2LINK1 

PCB 


rxs 

XPTBRit 
CEPFILE 
1MB UP P 
PCB 


7786 
72A9 
7291 
7235 
7080 



^s»- 



£d Smith 
Cenaral rfmnaaer 

ES/ja 

Solar Coapui^r Sy\(ea» Corporation «nnouivc«l i complete 
*er*i , of V0f(«wre progrmet of tocctil lnt»r«kt to ridlo and 
televltioa SUtioai detiaaed tfl n*ion Smo«e Slg«#l Broodt4Vtlo9'« 
ChlefUn Solvit, 

A**l)il.)» pnograa) Incledc 4udie«xr ^Duraaeet. attitude 
re*e«rctn m/*lc r*se*rch. iHestyle survey* , MSHROM arw»lr»»t 
ond eore, 

SOkAK COMPUTER SYSTEMS CORPORATION 



?3W • 43rd Avenue t»%\ 

Suite «W8 

Seattle. UiShlooton 9B1I? 

(20b) nt*U4\ 



Whltathorn, 

1 Leaea Road, 

Hoeth fclwyr, Vie. 3104. 

AuaTralla* 

Telapnena) (0)1.B»7-P12B. 
29tS Svptiabor, 197t t 
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LETTERS 

Oeor Mr. WilJiae-, 

HmUrzi+9 t« tha P«aale B of «Se ^L» Quirk" In tha 5«ptt*ber la«Me. 

Tha hocereU "Pink Beak" (rajBOO Kicrec«»^P**ter »^t» Saalffn Dtta . 
Kotarolo tnc* 197*. ), poge 3*, ahowa thot tha CLR le ana of o group of 
inatrucclene uhlah *l-e Include AJU As»r C«H# \nc, INt, u»* RIS* «<"-, 
■ Of end 1ST. Tfeeea all follow the earn* ta^nca foe both tha attended 
aeda (a etapa) and lDdaxed mode (7 acapa >. tat the extended aooe tha 
m««k» la I 

1, Peteh Op. Code. 

1i Patch upper byte of eaaory oddreee, 

J, ratefc lpwer byta of aeaery oddraaa, 

4. Head current eontenta ot «e«ery. 

5. Internel operation, depending on instruction. 

6. Write aodlflad data beck into aeeo*?, oitcept for XTt (dueay 

cycle). 

Incident*?, it looke oe U yew can expect the mm piealaa with 
the eB09, although I haven't tried It yat. CLB le part of a etnllor 
group of lnetructione, except that TsT le reaoved aad LBL (i-ogicol 
Shlfr Left) odded, that go through e o*quence Involving a RtAD butot* 
the WRITE. 

Dso CL* Instruction oppeore to a* the only ona to oowaa thlo 
problae, aa v« need to read the *e"«ry eontatit* a a we can inrraaent it 
or ehlft it or teat it, although we eight juot forget about this otap 
when writing the peograa. 

W Micro Journal 



tWo opro quirks you olght like to thlrOt about. 0»or»»t put • PTA 
oddraia at tha ■ ♦crt of • block of ■•■ory r yov alght got caralaoo a*d 
put an r» in tha byta bafov* it. A*) don't uao VH*.»2 oa an Ctabla 
for a PTA. tot* of thaoa «n oouaa y«»» to aioo on lnto*n^t. And 
fton't forgot that if y*a gat ait Mil vhila mi vicing o SWI tho «M0 
will jump to tha 1*9 f our int. 1*6 tall vow vn. but i'a Tunning 
out Of tpoea. Ppr tho no vara bovi a Look at Appondix A of tho HS80Q 
HUrop*oca*io* Appllcotlon* tonuol - Hotorolo Inc. 1*75 , ppa Al, A7 I A10. 

JWap up tha good work with tTto aaga£*|n*. I>vo only soon Lacuai 
no*. 4 6 7 *o for. It appoara tharo la only on* organtaatlon bringing 
It Into Australia ot prooant, oral thaoo oro tha only capiat ha ho* had. 
I hop* you mIII kcop on with ootoriol /or tho «flO* and. 68000 in duo 
court 0/ and thot mo ooo ooom saoro eoolaa hara aoon. 

Y oubbT^U nca r • ly , 



($L* ^^, 



A. Lyrvi Salt* 

2UD5 Joseph Orlvo 

Clinton, MO, 20735 
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004V ; l •-• , 

tto ortloU lb 7P« A «*« r ?9 loouo oa pf. 11 Utlad 
•Fotob 41 ok o*»a 4 load 990 top* laaia* hu ■ error 
la lt» dtffoototl&r %o kSOOO Cfttooa-. I ua«d tbo boodo 
14 oo to patoh Is ■» •** tope o* * off routlse, and tbor* 
lo ebero tbo orrer r««rod Ito b**i. lb* bv« Uoo oa 
N. 15 it «ddrooo 60004. tbo oerroct ood* aftoald box 



C004 6X01 



Ltu fA#i Put Mtun iddy. In a 



What bojooBo la tba & ooatoloa tbo aott orollobU 
aaaoty oddroao la tbo otaelu Vbat wo »a»t la tbo loot 

too byta s pi oood oo t»a **o*k by tbo oaV JH iootr- 
uotioa* tdUob !■ ehy yoo aval load X ooa byta off of JL 
Toli *111 lot tbo oorroot data off tbo a tack. I oo 

olao aooloalnp; ay tape oo 4 off routioa la oaaa it 
■*r be ueoful to otboro. 

tb«ok you for your ooaatderotloa. 



Dear Hr. WJllJi 



■d»v tnpnko TO you Ond Ob* Jgh n »QO 

(fttuo). there J» only ooa problem, the patch reovilros 



/SCOPf In , 

ioiogBodUlcAtloO to wor* with <yttoa« uflfvg Sourtbud 
•onUor. At th« ri\k o* «n*r.H>11*g tn« .^ovrnol ■] tn t\ 
(fiockspacd) arttcloi I'vo anclosao a Hiring o* oa*>' « 
program that I hava rewrittan to work with fcn*Tt£uo on 00 $68 
vartions ,J1 and .U2. 

The patch r»a» boon writ tan to *Wt*) dJractlv to t»a DOS 
In piaca or tha ' SBT* ovarlay U5od with tha Snoka Signal DOS 
ovio? Smartbuo.. 

tn my system a control H or So6 It used for a backspace 
charge tor, Tn[s character nay bo chafed at addresses 4?W6 
and V>«f( to SOf or whatever other code your terra Joe I nay 
require. Tno 00$ BftlAK codes, as supolLod from Smoo:a 4 »rm 
Control X and control U 4 J have replaced the control U with 
a 'grave accent 1 <$60) code limply 'or the convenience o* a 
single key break. This may bo> changed by replacing th« 560 
at address S7U88. ^ 



SJneerely, 



«. Lynn Salt* 
Septoober 29. 1979 
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Sinoo o^y plannod 6S09 eyetesi li not up and runAltyj with a 
word proceseor proxraa r thie la Just on old faehtonod typo- 
writor latter. 

As I do not yet have a 6BD9 «Ms I oannot check thla out, I 
hopo eonoono can. In inderod addreeainc tho auto Lnereaen? 
codfi are Ileted aa only bslnc udoable in the double aodoe 
when ueln« Indlreot adorooolni in othor worde, thie la " Illegal" 
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the Indok oode to try for thie would be 10000000 or SO ho* 
for the poet by to. There U a alight irror in tho L1PE pro- 
Itraaj in tho Soptoofcer loouo. aiaeably line 00162 waa lift out. 
Tt ebould appeer llbo thiei 



00162 0IC3 C6 50 



2 UP 



LOB 180 



•LIMB COUNT 



ay lordvora doeodoo ottbor a 065 or 904 eodo to lui 
off tbo roiey to «y eoooolto. T6*t la <*bf 1 ooa oaly 

oao ooda la tha tapo off rootle** tko firot port of 
tba top* om routioa ooald b« d^pllootod to oopporl 
o ooporota ptctob a roodor ralay. »/ top of aooory ip 
at 65277, oo that lo «dkor* ep routlaa Ha*, It o*m bo 
pioood ejgndiaro* 



I hope you have aon artlclee foaturlng tho otherbui (BXOR- 
ClSOt) beeids* tha sS-50 <elnee r uae Motorola egulpojent). 

^ood work on tbo journal, 

oerln Adler 

2765 Marl Oa* Drive 

Highland Park. IL 60035 

01 lb art *, porta 

5642 lal Pro Id. #3 

auror lerUd, ad, jy^oi 

Sm.» 4 W71 
■66 * Utn Jounol 

5016 laaui bt, 
P.O. Bex 669 
liaea, rem. 57545 



'68' Micro Journal 



Hr. Anthony Nleoi 
11 Hlitnote Street 
Naadafi, CT 06517 

Saptvtber 2$. 1979 

641 eor 

64 Mioro Journal 
1016 llanill RCd4 
P.O. box 149 
Mscton, TN 37343 

Door Sin 

I 5uet want to let you know how vory onioh I like your publication. 
1 think your plon of publish! g tha beok ioiueo in a alnolo volmte is 
exeellontr end lo eleerly tho only way to go* Thank* Cor publishing the 
revlaw of tha $w?PC 6o09 board. 1 would get ono lanadlatoly eicoopt that 
I hove too oaich eoftvare for tha 6100 which I would have to convort to 
6109 format, Mould It bo poseiblo to awl tch aeleet botveon tho 6160 
and the 6609 board, or are the anther board changaa too extondlva to 
parol t th^t bo be donoP (i have tha 6WTVC CT-01» tho 8WTPC 6800/2 1 on6 
tha MF-16. with fOK RAX.} 
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DOUBLE DENSITY 



The most reliable, cost effective disk system ever 
designed for the SS-50 bus is now available. The 
Southwest Technical Products Corp. DMF-2 disk 
system provides 2.5 M/bytes of usable (formatted) 
on-line storage, (t offers the lowest cost per byte 
available on floppy disks at this time. 

The DMF-2 features "Oume" DATATRAK 8 
double headed eight inch drives. We consider these 
to be the best drives we have ever tested. The 
MW x 5" x 21 1 /2*' cabinet is made from 1/8 inch 
thick aluminum and finished with a super tough 
textured epoxy. The power supply has 115/230 
volt capability and will operate from either 50 or 
60 H2. mains. 

The controller is a direct memory access type cir- 
cuit, using the 6844 DMA controller and a 1791 
double density disk controller. This type circuit 



has a much higher data transfer rate than simple 
sector buffer type circuits and it also imposes far 
less overhead on the processor The critical phase 
lock and data separator circuits use 1% compo- 
nents and time proven circuits to insure long term 
reliability. We find no statistical difference in the 
error rate of this controller and our single density 
controller. 

The DMF-2 is supplied with the FLEX® -09 opera- 
ting system, You can format and record in either 
single or double density. FLEX® is the world 
standard disk operating system for the MC6809 
and is available for almost all 6809 family hard- 
ware, whatever the source. 

The DMF-2 system includes the cabinet, power 
supply, controller, connecting cable, diskette 
with FLEX® 09, two drives and instruction 
manual. Shipping weight is 53 pounds. 



DMF-2 Duat Double Density Disk Driver-assembled and tested $2,495.00 

DMF 2 Controller board retrofit for converting DMF-1 single density systems S 395.00 




SOUTHWEST TECHNICAL PRODUCTS CORPORATION 

219 W. RHAPSODY 

SAN ANTONIO, TEXAS 78216 (512) 344-0241 




Print with Quality and Speed 

The Southwest Technical Products fast quality printer system is based on the "Qume" Sprint 3/45 daisy- 
wheel printer. For word processing applications, where quality and speed are both necessary , this printer 
is the answer. Over a hundred styles of printer wheels are available, including proportional space and 
foreign type fonts. 

The SP 3 is supplied with the following features: out of paper detect, out of ribbon detect, top of forms 
elect, bottom feed slot, cover interlock, operator lights, paper handling system and switching power sup 
ply. Optional forms tractors are available for applications where these are desired, The SP-3 printer is 
supplied with a twelve-line interface and connecting cable for use with all Southwest Technical Products 
computers. 

* Average text print speed of 45 characters/second ■ Features electronic tabbing and carriage return up to 

* Prints full characters of electric typewriter quality 13.1 inches at 320 ms maximum 

* Uses variable intensity ballistic hammer which automa* ♦ Vertical spacing in increments of 1/48 inch, up or down 
tically adjusts to correct one of six strike intensities 

according to character sue # Vertical s,ew rate of 5 inches P er * cond 

* Accepts single sheets and continuous forms, with or * Plotting resolution of 5760 points per square inch 

without sprocket holes # Features pressure platen; pin feed platens optional 

* Prints on forms up to 15 inches wide 

» n - . . . ,. . ... . . , • Easy to handle ribbon cartridge with multi-strike carbon, 

* 96 character positions on daisy printwheel 

... M M , , - - single strike carbon, or fabric ribbon available in black 

* Wide variety of standard font styles available in 10 and . , 
,„ ,. . . , and colors 
12 pitch and proportional spacing 

* Prints 132 columns at 10 characters/inch # Printwheel is easily operator changeable 

* Prints 158 columns at 12 characters/inch ♦ Operator controls include horizontal forms positioning, 

* Prints proportional spacing in increments of 1/120 inch, vertical forms positioning, forms thickness and ribbon 
left or right advance 

SP 3 Daisywheel Printer-with listed features, interface and power supply $2,995.00 

SP-5 Serial Daisywheel Printer— with above features and 

power supply {less serial interface) S3, 195.00 

80026 01 Optional Forms Tractor $ 190.00 




SOUTHWEST TECHNICAL PRODUCTS CORPORATION 

219 W. RHAPSODY 

SAN ANTONIO, TEXAS 78216 (512) 3440241 



Although I built overythlft? except the CT-82 eyeolf. I «a basically 
• *>*9innor. <I uee the oonputar mostly for taxt processing--. I toach foreign 
lengtia<7ea, end have no previous ^usputc,? experience.) Almoet all of my own 
programming of fort* heve bean Halted to BASIC. Although I really llfce 
the spoed of the new tfC BASIC running under rttx 2, there are tinoe 
when 1 Mould profor the incroeeed orlthmotlc accuracy of the SKTFC 
disk beelc, which la much alower but haa BCD arithmetic, la there anyone 
out there who haa convert d the BWTTC Diak BASIC tvotelon 3] to run 
under nr.X 21 TSC doean't provide converaion lnetiuctlona, and el nee 
SVTPC doean't provide the eocrco code, euch a oonvorelon la a bigger 
project than moot of ua would eare to taXo on. 

I've only r contlj atartod to beo v o lntereeted in eatoa*>ly 
language programming, in which I am even eoro of a neophyto then in 
0AS1C. I em enclosing my flret program (actually, it*a too smell and 
too eeoy to call It that) which la doeigoed to ssnd ths spproprlste 
control chereeter eoquence to the CT-82 terminal to configure it 
on etartup for my major ueo; text procoeeing. Porhape you might want 
to print It aa an example Of a moat elementary aeeabblor 
program* (Slneo the program ie eo simple, I wouldn't expect your 
ueual extension of eubecrlptlon reward.) tUturelly, any uaer could 
aubatltuto his own choice of control character eoquence for any of 
mine, or ainply add earns additional oiwi aa necoeeery. 

I am looking forward So your cooing eaftwero revicwa, particularly 
of the faecal advert laid by Luoldata. la it any good? 1 roally don't 
V.no* If 1 vent to learn Faecal yet, but if it le really aa powerful 
aa aft* Is elwaya saying, perhapa one should look lnho it. 
«y little terminal configuration routine is attached. 

Bast of luc* to you, 

Sincorely youre. 



weldy moffatt 

IX ta «*sss)|m pfS 
remlm* suk ealMtH 



!9 HP ?0 
1 mcno JoinvAL 



I submit e prow in SbTPC BASIC 3.0 
secretary of a aenrlee olub. 



Anthony :4upbb J 
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Anthony 

MAM CT.62.CNE) 

BY TOtJY HI8SX 
TfltS PROGRAM MIU. SCND T1IE APPAOPRIATC CONTROL 
CMAAACTGR SCQbEMCK TO THE SHTPC CT-12 CRT TO 
COMf I CURE IT AS DESIRED. 



or yoxir oonsld ration. 
is *aoret*ry of a aenrlee olub, 2 an called upon to run 
she buslnas end of a root ball pool. Followlm] smsfi ammo 
•Aire mi the job of firmly out stw the holder* of the 
winning soorss wars and for s typl *1 gmam It took About 
> hours to aearch througft the ticket stubs to find the 
ssorsa that mmtehmd with the game soorss. 



The printer of the pool tickets had pointed I60O oocmlnatlona 
with the eerles dsersmsntlnt by as point for the horns team 
and lnorsissntlng after each Tourtlsth ticket for the netting 
team. There srs 19 ganea in the eohodule and the peo3 tickets 
are oold as e boon let of 19 ttokats In a ntabbermd book and 
vmyyrlng baae stsrtl g points for eeoh gA/es, in past 

rears ths tiokets had bean selected at random bo find one that 
had a winning eeore then the others were found *r branching 
out. 

It was osvlomt to am that the printer vms using a rmtthsmstleel 
formula, to print the tiokets and th*t by examining booklet 
1600 And treating it as in s fonnula %l\ of the booklet 
numbers for the valid winning scores could be calculated, 
A simple BASIC program proved this snd this prog ran le the 
on* that has bean used for ths 1979 " 



CRATES 



IH | 

AT IE 

0100 

0100 CR 01 1A 

0101 DO AD IB 

a lot cr 01 id 

0109 SO AJ> \Z 
OtOC CC 01 20 

oior » AD lc 
0112 en 01 2) 
oii'i no ad it 

0110 10 oc 
011A in 

011S 13 
011C 04 
011D IX 
Oim ID 

our 04 

0120 1C 

0121 0* 

0122 04 
0121 IV. 

0124 07 

0125 04 

0125 7C AO 01 



ri*cx 

P37PMC 



too 

BOO 

0RC 
LOX 
JSR 
LOX 
JSP 
LOX 
J3» 
LlM 
JSR 



NOBUfX PCP 



5AD03 
SADlB 

S0100 
tHOftLWK 
PSTR:« 
IXAHSKT 

venue 
nmam 



rcb 

PCB 

PCB 
PCB 

rcb 

PCB 
PCB 

Ml 



lr:CHRPfl 
PSTRKG 
RTTRK 
flEjIU 

S04 
11C, 310 

S04 
SIC, S09 

SO 4 
SlE,S07 

$04 

PLEX 

CPIG 



SET BOH-RLI3nrr(IC CURSOR 
DISABLE StIIPT UrvaRSIOb 



SET tO*# INTENSITY 

XQ4DAC CHARACTER PDOTXCTIOM 



This program should be easily sonverbed for m& pool *ith 
tlakets numbered by forsjule. Tna line ?7J0 the home score Is 
■F" snd the opposition la H o' while Una ?30 gantrmtas the 
booklet number, tine 11*5 provide* an easy set hod of 
abcrtifwt the program by entering a ecorm in eseeas cr 900. 
Lines 7000 and 6000 aonwert Invalid booklet raavbarm to their 
equivalent valid number. 

This program assumes use or a video terminal and a keyboard 
for data entry and a printsr for creating a flls copy of 
the output. When used with a video terminal alone, all 
reference* to alternate port should be taken out 
and a suitable stop inserted after printing or data on 
terminal. I like to use INPUT At then the program will 
continue after a carriage return. 



OAfk u> IH* 
IMC lsftb> 

hk*t an* 

SCORE 10 
Dfltl OF (set 



:t0 ERROR (S> OCTRCTrD 



svnnoL TARLKl 



CPIC 0100 
NOBLER 011A 



R. DsaoiasAL 



CQCATR 0000 
NRMSIIP 0U0 



PLCX AO01 
PSTRNC AP1R 



LWINTK 0120 
RETRN 0126 



HCKRPR 0123 



FiCl Klut 

sac »i 

icoc 1 1 

iu^i * <• 
MM II 
>«M * T 
*U& * li 
M*t »1» 
SOMt # U 
bOJb- 121 
«.*t I ml 
w-uvi ■' U 



beldy 

1 
1 
un 

m* ni/v 

M 
Use 



ftX» mat 



I lb|-« 



After uptradieg ey :;RTPi bdOO tltk Ualr (609 board aad ab«cklojj 
oat (h« basic fVectloaelltp of tat ISC softeere* I 0««t<ai4 to 
(lei tkt tBC 0&O9 riClC »lt» (be sssia b*»tbwarS pro«*eea uaid 
U lesma #10 of KlLvl»lOC< le ordts to ootale ascurate tlmaa, I 
tztaaeai ti« progffea 1 be? t to prempt vita the tiaa of day (s # « 
Jeae H«ui of 66 Klaro Jotraal) la aloak at t/fO aec. ies^aed 
of at I ess. By aodlffUg tbe Oaackaa/k progreaa to dieplar ths 
tiai isataad or Ui "STikT* aad "PAip" aaaeagea, I eas able to 
oeteiA atttrsssl7 asciurets tlese. Tba tasla bales eaomarlsaa 
the tlalese I abtalaad aloM alts tbosa gi?«a ia KILOBaDO for 
tba SVTPe OK wA*lC (1,0), 



■laiiairt J 


1 


< 


3 


A 


3 


« 


7 


o«oo 1AJIC 


H.* 


ib.7 


M.l 


ie*. y 


TOS.8 


174.1 


iOA.5 


amOt BASIC 


*n? 


3*5 


10.49 


11*3 


tlttJ 


17.59 


«*»9 


bftOf BASIC 

HS«aWJ— . 


*»i 


J.sl? 


10.9 


I1<£ 


n.ai? 


17.23 


2S.533 



etie «R • MINTCK UHS 
*L* Vfcn < [1 j v - W 
dsM RlR " «Uh> nu>Ml f rntPia 

kRHd Hi* • Iff-l** UliH-i4 

Bms) fvmi o*Hib>Jt>erit«> 
ewv Lift- i« 

Wtl KA I HIS t«Jutoft Ub*v IU file* Hlnsl 

NC 

eUtt NLA HUL fifUtkb Jk i*W u> ISMb » 

00XS 

MM ROl FOR IP (S*ES ^L0R£S Bttm FRi) 

n 

ggM fttn *o - ** ^0 * ■ < 

*l*5 MUl FWJUM41 li itL> munPUPSi n* 

sum sal Idfatri wrwiiw 'Jk K*f ^ 
els/ nn *ss> ylubo ^»j hki 1 
mm n* iu utr w«#w ua btua. ^9 
dbti wi MgH^Mtms 

qx^b win ^•^^••**********#tw****b]*"j'*j *>##** 

ei» i»#Mi *0Rrt u> isfc'.Ys 

9tm IspuT -CrUt lsJimJi«.u 

tab f*lHi -uvER M4R f Nin btkP. isee < 



aVbV 

«2» taPUT fco 

BZ2U Ltl ^«<uav*e>-nrMb> 

«zn if su uvSub aksj 

Kiss »vimI xttEA ig n»k ms* ima "s* 

»Ob »^riNl Tfo SOA* ' 

82bb rviNi ■ tap 

minj nam » \ 

tsm »*iNt - 

nTM >*INI * s " 

0PR» >?IW1 - 1 

oUb wlbi -OUfci 1* bum hMfO* i«l *tn 
AI2B inyut "t« SK N>'.XI 

am if xip'R" suiu as 

«8sV «h *•• Dgmy t* W ini^k «*• 

8016 WKI- ? 

UN PklRT Tdllt UH tttlt %« 

teas eMiNi ^fb rsysjtir -,g 
MQb rXiHl -f|>ol MX* *»i 
mw i^*H" 1 

HAN Kt* «a* Utl iffb, SU*0^> •** 
1119 FRINI CM«(ib>.OSH U ^> 
lMtf imnjl '1ST iumlMt 

1149 JF HXAAJlhtN tm- 
lUH IWAJi »JU Stlmf.u 

iim lit «-s-tRnmo*biJ 

lias II XHbtv la^lAi WHS 

128* «A *p* lun? 0A pRlNTtk ••• 

I2b0 P»l- 7 

L2M PSIN1 -SCO* 'jRjQ, 

in pkiMi injiaf^-oap r>x 
xm ooro j>« 

njaj LET S^Masm 

nju *tu» 

tRJN Ul u^rlfiflB 

asii jsruoi 

99BV P0R4a f 

7m PRIal PRIM I PRIKT 

9m print print mi*r 

91WI. i 
PIP) Os> 



Tbe 6809 tlaei aoo?a art tba e?eraf« of tbraa coesesutlvt ruai 
of tat prograaa. 

It aaoald be aelad tbat tba list mlffareaea oetataa too aoaaa«utiin 
raqutate for • ties dlepla> via tba 9*R faeotloe la .193 sac* 
Tba actual program vaad for baa4bBark Prograa 1 is abova baloe; 



• Alrai 



Ul AlTUlam At,, fl$ 
Hag 04%, Mifenm* 
WMO 

W#slj 1JTP 



>pp S*va* (*> 

bM W. K-1 TO IPPP 

3fi RCTT I 

7dp b.0AH<P3 
«dg i2<0 



P. Paabtaakl 
12 Rlsbard Rd. 
Nadsap KA 02O$> 



[ as gritmrul far bms 6S 11^ jouramU If it beep* ea at 
1 will ba oamoslHag B*sr»Tto* eiamr mbmr* maga I gb/vmti 
meet a> seems amd I damH baes ba seam Sbrvusb ■ bsmab «f 

■rial aad llama Go* m? amsmlms 

2 as lAole«BBg s prlntoet af a smsU pn»sTAm I vrote rsasmtlr tvr "trtnf 
oar Oarlebsae card IbbaAa 00 07 printer. It la for tbe IfD U» AUk system 
uy pureem tad lamHtteo la raroa's Baies»sma|o <t it areatee a CilM em dAab 



Aiela, leaas so l« 
tie pamf gm rate* " 

as jensre assms to 

etaff to flms material 
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of tna aaii and eddreaaae and will ■■nit for * tpeolfU hh, diapley **• 
h*dnH and 4*fc If the uoar *mti Lo naka 117 oorrectiae** In mil ■anna' 
tha Hot tank* updated ** dmiM, It aleo contain* preflelon* for tb* flrat 
M addr***** to U uiad aa a eaperat* Lt*t* f&r un r*|Ularl} uaed tddredtot. 
"hi* la bj no aaaaa a fang? iwtar for builneaa-ae. It 1* ortj teiet it nw 
ta **»+,*+a aiapla file of addroiiee mat can b* aoarofaad and enaAftd aa 
oa*»iV7 ant that vlll print out **■ lafc*l* tfreej*el*ee on lUodvil fom-faed 
lata* Materiel, I ai^tadd (Jut thia la tee pro-ree mat finall) Hid ay 
•if* oa tha u*ef of a eaapuler In the ho**. It la olApl} atmlint to hatra 
that neat? antra of addr***!**- ike *n u*l oarda done for jouL Jt la alalia, 
airaiatktfoniBrd, kid ahguld, J va Id <u*m, anal with alnor ofaamcea on alaaoat 
iqy ayilem> In BMIG. I hopa >*v will find it ueaTul, 

Prior taaandlaf n aloft* I iftouajbt Itewld aak If you i«.W ha*a uee(*paee> 
for another eft* I rather ilka. 1 h*» adapted a preeTa* oallad ***ord* an- 
tenor?* or t*a 660L, wMok *ppMr#d,nri*iaall* J I baliavo* In Ciadim* aMmUaj 
( I eon *ad will euppJj a oopj of the orifiaml » rU 9.1a n aj-a-eprut* M 
oanba flwn the orlainal author,} *hi- !■ not ^tiia la*ftAjr, bovarax-j vkltten 
Tor the LTD IfOO, H***> ***' will i**»JA *o baa played before, **t*er thtfr 
aon or 1441, and ho* of t*ttj and boa fax they b*re veeolled (an internal aaa* 
«*ttarJ F inth impropriate peetlnj* for am or old play era. It la tna eekt 
popular |ww on «c| a>ataa at p-aoant aeon tfvow«h It aoaaia to ren Jr* no ami 
vhitioenr. It teka* tout Uj-15* to itora in on* pl*oa p but I have It written 
1a thro* aapa aio kaotlona wMoh ara 'obaliwd* tocatner aa kaedad, U it li 
long, X ttOefAt Z wo Id aakbtfore aaodlaj a liaUni to »ou, but Mould bo Uft-> 
%a ahara U n* tfct J ournal . 

'brlOlj, 1 oa»a a tiapla (?) boutaftold a^avouvU profraa., a|aln in fliJlC with 
dlafc fliaa, w ice atoroa V* a»o«d>U and ataaben at eutaiaodlAa coaeSaT provldad 
ahaattbook bai^mliaf rot- tinea * «to. 

1 hoP« iheaa td^t >• vaafulj bet due t# th» lancto of (Aa letter two 

2 t6ou<J>t, 1 *j. id «ok <^ ur *• eenAUar Uae* al 00 ** 

JU*ln, tAank )0U lor >ocr Jotrnal. leap It up, X lodecd undlng V r^)aiMl 
for thraa yaara P In iwauat (to beat toa |wica inoraaaa in September* of 



Slnoerel^, 
fAVL X. FKILra 



Mil rid r ^ it PMourm irittin jimI i jult w» r^ft cuftttoir »■(> •tiNTiM 

Ml* ■!■ ikO fOlflht Or Que CMI1TUI C*RD KIT IDOIfllEl* It tll« «*i 
Ml* »(■ MftVftlOk *0k Fit Ml HI TM Mlir If iHifllE* ON TM| U|T POD 
Htl Rf« l«Clit MIL J kit* IDblllOtrt fttiil IE liM <ipiU" IN THi 
M» kt* MfllHeL HIT Ok th( J W ] fi^M UlTIMt 41 IMC fkO OF TH*T 
ft It k|k RMriAk OF Tuf li|Ii IF IhIT lit to §1 MftT Of Tkar IC'fkirE 

tti* tie LttT. m ori«c« tooiriokt oh OELtri&tit titi occiki ir rtn cmo 

MIT «■ I"! ICtULlk riLt* UHt» *N0 lOO*[flff "Lfll Mf IE 10H*EH THAk 
*|Jf Hth Th{ OH«FNtL iHTIHf HtUl l ft fk#U l»«l* (OlVlOEQ IT 1l) OH 
IMC HtH flUt llHf* ftlf tHl POLWOHIkO LIHt HILL II «MSfO U»* 
MM «• HRITED Ik tVFEHMSIC- CM r«t IFD MO Btln OHUE Hr 

late kta piul t- »ktiks ni oimio* sr. *m» ki i cm* chipohnia 

Mlf «ER 011)0 

IMS Ufa '0/ IS MOkEk tklDT POR MlvlkO W0fH|«»> 10 INTCH. 
MM 0k lH #1t^KMA)Fl»lMSI0kt fit 

ill) Lih|> f 

elM miht • hjut 00 too aikr 10 0« rooor** 

flif kkiaT l*g|rsj:'C«««f <(M>Hfl!Ef OH l*Ull«»l - TtP| - CHknOE* 

*\t* Mini Tiim) 1*100 HiHCf TO INC LIST • I T^f > 100* 

■ lit MIH1 Ti|(}S}[*MlHr THf iHDLt L IIT OH LaHEll - UPt - MINI* 

IUI MlhT r*§CUli*fttfil OHir tPICltt Llil OH LMtLt - 1t»E - t*ECUL* 

1 la* ktiiri ikB(is>i*nkiik *ov tmt 1 1 he * tt*t - fihkh< 

ttti ikkul it 

• 711 IP Lit flfit*i]n*-t- 1"EH ;tM 

MM IF LEFlt(M>1)>*t* t«|aj lie* 

9tU IF LftT1(l«>D'"H* INIH Ulir 1 flOtQ JMI 

mm it LitTit*t«n«*i* th|h t-M r tore mat 

MM IF ittlllM*1)*"F" THfk CL0« »1t i tkO 

1IM ata ImIS )S fMC CMiaOl StCCLlad 0» iPOaCSS kROORiH 

lilt »|10 «10iCl/IMI 

111* ooro iim 

llf# (hkyl ■Mfe(i«iOi 

lilt It Of*"*- TH(N 1M 
1I» n*UT ^iOOHESSi* lEI 

tni 1 »e>u r "Ci II i' .fi 

%W lakuf "IUTE *« ri H i*i*t 

17^0 MINI ai#»0f«O/lt.Ct»i?f10itl*Oftt#0«» 

17M Pkiajl #^0 

ItTf «OT0 lfM 

2MI kEa 1NIS IS IHE ICiHCH aM3 OISPUt 0a tlOEO tROtPlb. 

2#l# DEN If tlSO ttlOtfS FOR CNlbOES 1 N keel < 400RESS IF KfCESSiRT. 

7111 INPUT "EviCT nalkt PLERSEi" )H« 

;n» if »»""»- TMtk 111 

2121 iff X»LfH(M*)> kli mis 1005 SPtCtS TO m$ SO If kfll E0U»L 

?13« IF Ii1« INEN ZJMi PEK »NiT 1S STOaEO 0b OlSa 

?)<? r»f 1 t«l«-i 1 OOSUH Hit 

nil T»3*-x ) I0S1* 2111 

?M* T»M.i l 60SUH 2111 

217k T.Sa-i 1 I0SIM 21M 

21N If S0«(T)*l INEfc 2211 

2111 llTUHk 

?2M F0t »*1 10 f-1 

2?t» UT Nlaet** • 

222H NEUt I 

211* HFSfOnE *\i 

f)\r REI0 'MtCI/tlM 

7910 H>(CH 1 H'fc-*ft 

2JJP IF Ct«til fMlaj MSrOM ait.N tBofo 2)M 

2MP 1010 2J1» 

?1W MI0 *1|*CI/4ltt 

?m IF C» Tm||i 23M 

2)TP rklkf C» 

23M ooro rjf* 

IIM Ft I HI 1T1? 

?IM ItaPUr *iar Cnt«iO!S NECESStPT «nt 

2411 1F UFlK lt«l)>*r" iMlk 2SfP 

IMP IDT* Hit 

7Mt HElfOHE rikik 

DTP IHPVT 'alef i*tOt 

2"2F IMUT »*DQP£i$i*:Ei 

21)f lapur *cifi i*itt 

?ia# Itfvt -ITItf 4MJ IIP tMM 

2SSI PRlhl #1tt0i.i?i)P»Et*ifalP»Ft'i?al*.ll» 

2SM Fnl*rf •!•»•• • 



?&7f 0010 ?M* 

lltr HtH IMS IS 10 PRlNf LABELS FOR I HE CAMS 

3r2P RES10RC 'II 

MSP HWti 1 

llAr rilO «1l*C>/3IPt 

ltW IF CS»" IHEH 3111 

tt6l 0»0. 1 ) fCft. 

«fl 6010 Mil 

^■*f IF 0-4 TnkM Otfi'fif l HEP IhIS SETS SPICES BfltftEN LIBILS 

lift it Omb TmEn 0-Ril 1 REa OH LABELS f/l IT ) 1/2 I*m|Si 

31FP IF 0*1 TkEN 0l| 

jilt Zi2«l t It Zm ImtH lit 

lilt 00T0 ^F4l 

mf foiii 1 

3111 PklPl TujfS fHE EeO OF IHE LIST- TOD HIVE "Till- LlOtLS NOf* 

312a 7«t 1 0010 ftP 

aatt ath Tm£SE STaitKhTS IHDiCilE a PROILEa S0*Ew»«ERE IH fN{ 

atll RE* PP06RA* 

M2P PRIH1 -S0*flMlt4 IS PkOm Hi In fHE IkPUf PUNC It 0N»« •! TOP 

lit* RklHI MKIT Hi*l II «*01 FOUMO Ik TM« LIST IN ExiCTIT fMA f FOIiMT* 

111! PklNT «1HT «6*|*r •LEASE.* 

tut toro jiip 

MM REM I UTILIIT PROIRAa TO PRINT MKaT IS IfORIO ON OlSa 10 fH( 

•111 flEH VJOEO klTH SECTOR HUHIERS FOR CN|Ckl**< 

Hit flttk f1l»-l!*liiFi» 

MM H»0 llltCf/OMP 

tPIP PRUT SCTHiCI 

Mil 0010 9 31 

IMP HOP *•! 



'*r HI CM JOLJftMAL 
301» rtAUXLL KB. 
PrO, Mk Mf 
HlXkOkr TEHWE9SCE 



jrni 



ktTMl Dee Ullliaeer Cditor 
Pear Oan 



Flrat of allr LfiartkB for UaLlna •roaraaa In bia arlnt. I' m aure 
Lha rati of the lrt~focal aet or-rroclotae iti too. I mbb able Lo 
lead 4i* Thp»|» y "ftealc lo DOB" (Auk taaue) without a alnila twFina 
orrBT — a firil for eel Uorlxa *r*»l> Uhleh brlnea ee to the »*r»««o 
of thla letter. 

Piaaaa eive Jle a •Varaallla Patch of the tee*** award. tf*al eee ba 
the eoat Oaeful aa^ect of Hi* r*od uaa not eerttloned l» the brief 
article* That la the potential to uae it to add trfnaient faaturei 
and overlava lo IbbIc For okke^ler I leeediatelv adartad Mleaae 
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One of the nost difficult components for the 
hobbyist computer system is interfacing the 
digital computer to the analog world of voltages 
or currents* The desirability of being able to 
Interface to the analog world ts becoming greater 
due to many of the new applications for the 
computer system. One of these recent 
applications is environmental control system for 
the home, workshop, or office. 

Data acquisition or A/0 modules for 
microprocessor are available from many sources; 
however, the cost of these modules Is usually 
quite high and may exceed the cost of the 
computer system* These nodules usually feature 
very high performance In accuracy and conversion 
speed and are an overkl 1 1 for many of the 
hobbyist applications. 

This article discusses an 8-channel DAN 
(data acqulstlon network) using the Motorola 
MC14433 CMOS A/D converter and M6800 
microprocessor system* This system allows the 
hobbyist to add an Inexpensive DAN module to his 
home computer* The number of channels of the DAN 
may be expanded or reduced by slight nod If teat Ion 

_ '68' MJcro Journal 






of the hardware and software* The Inputs to the 
DAN are high Impedance Inputs end capable of 
handling voltages of both positive end negative 
polarity* Maximum voltage Input Is 1.999 volts. 
The output of the system Is 4 memory addresses 
In RAM for each channel. These channels contain 
the 3 1/2 digits of BCO Information, the polarity 
of the Input signal, and overrange Information If 
the Input voltage exceeds 1*999 volts* 

Additional components for an existing M6800 
microprocessor system would be a MC6821 PI A and 
the MC14433 A/D. To aid In understanding the DAM 
described here, an understanding of the MCI 4433 
will be helpful. 



MCI 4433 A/D OONVERTER 

The MC14433 Is a single chip 3 \/2 digit A/D 
converter using a mod Id led dual ramp technique of 
A/D conversion. Housed In a 24 pin package, It 
features auto-polar I ty, autozero, and a high 
Input Impedance* Figure 1 shows the pin diagram 
of the MCI 4433. 

The output of the MCI 4433 Is 3 1/2 digit 
multiplexed BCD with the MSD containing not only 
the half digit but also polarity of the Input, 
and overrange and underrange Information. Figure 
2 describes the decoding for the MSD. The digit 
selects for the multiplexed BCD have Interdlglt 
blanking to ensure correct BCO data during the 
time that the digit select Is true. 

The A/D converter Is ratlometrlc and 
requires an external reference voltage. This 
reference voltage Is 2.000 volts for the 1.999 
volt range and 200 mV for a 199*9 mV full scale 
Input. Both the unknown and reference Inputs and 
analog ground are high Impedance Inputs. Other 
external components required are clock resistor, 
Integrator resistor and capacitor, and offset 
capacitor. Precision components are not 
required. 

Of particular Interest for the data 
acquisition systems are the display update (Dli) 
and the end of conversion (E0C) pins. The E0C 
pin Indicates the end of one conversion cycle and 
the start of the next conversion by a positive 
pulse one-half clock period long. The display 
update pin Is an Input to the chip which allows 
the data to be strobed Into the output latches. 
If at least one positive edge Is received prior 
to the ramp down cycle, new data Is strobed to 
the display. In this A/D system, EOC Is 
connected to DU. 

Also of significance to the data acquisition 
network Is the Input polarity detection sequence 
for the MC 14433. Polarity for the current 
conversion cycle Is determined In the previous 
conversion cycle. Thus, If the polarity Is 
reversed, a second conversion cycle must be made 
In order 1o obtain a correct measurement. 

The MC14433 requires two power supplies. 
The total voltage across the device must nor 
exceed 18 volts. Pin 13 Is the reference level 
for the output circuitry of the MC14433. If this 
pin Is tied to volts, the BCO output, digit 
select, and EOC wIM swing from volts 1o V0D. 
If, however, pin 13 Is tied to VEE, the output 
swing will be from VEE to VDD. 

The clock for the MCI 4433 Is Internal to the 
chip, requiring only a single external resistor 
to set the frequency. An external clock may be 
used by driving pin 10. The Iota I conversion 
time for the MC 14433 Is approximately 16400 clock 
periods. This conversion time Includes the 
auto-zero cycle and the unknown Input measurement 
cycle. The clock frequency may be operated up to 
about 400 kHz producing a conversion time of 40 
ms. 



The microprocessor system used for this 
design Is the M6800 system. Although an 
understanding of the MC6800 *FU and Its 
Instruction set Is necessary for understanding 
the operation of the DAN, space does not permit a 
description of the microprocessor. For this 
Information, consult the list of references at 
the end of the article. However, a description 
of the operation of the MC6821 is Important and 
Is presented. The MC6821 Is a peripheral 
Interface adapter designed to provide a parallel 
1/0 port for the microprocessor system. 

The PlA contains 1 wo essential ly Identical 
8-blt Interface ports. These ports (A side, B 
side) each contain three Internal registers that 
Include the data register which Is the Interface 
from the data bus to the A/D, the data direction 
register which programs each of the eight lines 
of the data register as either an Input or an 
output, and the control register which, In 
addition to other functions, switches the data 
bus between the data register and the data 
direction register. Each port to the PlA 
contains two additional pins, CA1 end CA2, for 
Interrupt capability and extra 1/0 lines. The 
functions of these lines are programmable with 
the remaining bits of the control register. 
Figure 3 shows a functional block of the *C6821 
PlA. 

Each PlA requires four address locations In 
memory. Two addresses access either of the 1wo 
(A or B sides) data/data direction registers 
while the remaining 1wo addresses access either 
of the two control registers. These addresses 
are decoded by the chip select and register 
select lines of the PlA which are connected to 
the MPU address bus. Selection between the data 
register and data direction register Is made by 
programing a W 1 W or n Q n In the third least 
significant bit of each control register. A 
logic "0" accesses the data direction register 
while a logic "1" accesses the data register. 

Bv programming "0"s In the data direction 
register each corresponding line performs as en 
Input, while "\"s In the data direction register 
make corresponding lines act as outputs. The 
eight lines may be Intermixed between Inputs and 
outputs by programming different combinations of 
"1"s and "0"s Into the data direction register. 
At the beginning of the program the 1/0 
configuration Is programmed Into the data 
direction register, after which the control 
register Is programmed to select the data 
register for 1/0 operation. 

8-CHANNEL DATA ACQUISITION NETWORK 

Figures 4 and 5 are the flow diagram for the 
6-channel data acquisition network. Figure 4 
shows the basic operation of the program while 
Figure 5 provides more detail on the A/D 
conversion routine. The hardware required for 
the data acquisition Is shown In Figure 8; as 
can be seen. It Is fairly simple, consisting of 
the MCI4433, MC1403 reference, MC14051 analog 
multiplexer, and an MC6821 PlA. The PlA Is used 
as the Interface between the microprocessor 
address end the data bus to the A/D. The 
microprocessor and associated memory are not 
shown due 1o a wide variety of forms possible 
depending upon the task that the total system Is 
performing. 

The reference for the MCM433 Is an MC1403 
bandgap reference which provides an output 
voltage of 2.5 volts. This voltage Is divided 
down by the 20k ohms pot to tne 2.000 volt 
reference required by the MCI 4433. If a 200 mV 
reference Is used, full scale for the DAN will be 
199*9 mV* 
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The analog multiplexing required to handle 
the eight Input channels Is provided by a 
MCM051B O40S multiplexer. This device selects 
one of eight Inputs with a 3-blt binary code* 
The device Is capable of switching dual polarity 
(plus or minus Inputs) with a single polarity 
control voltage* 

The MCI 4433 BCD output and digit select 
outputs are connected to the B side of the PI A as 
shown In lines 20-27 of the software routine. 
These lines of the software are comment lines 
only and do not result In code for the 
microprocessor. The B side data register of the 
PI A fs labeled throughout the program as PIA1BD 
wh I le the control register Is labeled PIAIBC. 
The control I A) lines CC81) of the B side PIA 
connected to EX of the MCI4433. 

The first executable Instruction for the 
program Is In line 43 and starts a section called 
PIA assembly. The PIA sets the A side data 
register as al I outputs and the B side data 
register as all Inputs. From there the program 
goes to the main program simulation which, as Its 
name Implies, Is a simulation of the user's main 
program. At such time In the user's program that 
some analog Information Is required, the A/D 
converses subroutine starting tn line 60 Is 
executed. This routine synchronizes the program 
with the A/D conversion cycle and selects the 
first chanel to be measured. The program must be 
synchronized to the A/D since the A/D Is 
continuously converting, and channel selection 
must be performed at the very beginning of the 
conversion cycle* 

After the first channel to be measued Is 
selected (channel 8}, the routine was for two EX 
pulses from the MC 14433. Two EX pulses are 
required to ensure that the polarity 
configuration of the MC 14433 Is compatible with 
current Input voltage polarity* The MCM433 
determines polarity In the previous conversion 
cycle. Oice the second EX pulse occurs, the MPJ 
must demultiplex the BCD Information and check 
for over range for this channel. After this has 
been done, the next channel Is selected and after 
two more EX pulses occur, the BCD data Is again 
demultiplexed, etc* This procedure Is performed 
for all 8 channels after which the program 
returns from the A/D conversion subroutine to the 
main program. Here the A/D Information may be 
used as desired. 

Looking at the DEMUX software for the 
8-channe! data acquisition network In more 
detail, storage of the final results begins In 
memory location $0010. Each BCD character Is 
stored In four LSBs of these memory locations. 
See figure 6 for explanation of data storage. 
Each of the eight channel readings requires four 
memory locations with the MSD occupying the first 
of each sequence of four memory locations. The 
Index register Is used to keep "track of the next 
storage location tor the BC0 Information* At the 
end of each channel's conversion cycle, the Index 
register points to the MSO of that channel. 

As mentioned previously, the multiplexed BCD 
data from the MC 14433 Is demultiplexed In the 
DEMUX routine. A "1" Is placed In bit 4 of 
P01N R which Is compared with the contents of 
PIA1B0. Upon finding DS1 In the 1rue state, the 
lower four bits of PIA1BD (BCD data) are placed 
In the proper memory storage location. P0INTR Is 
then shifted 1o the left as each digit select 
occurs 1o look for the next successive digit 
select line. 

After all four digits are placed In memory r 
the MSD Is checked for overrange. If this 
condition occurs, an SF1 Is placed In the MSD for 
this channel. Otherwise the half digit and 
polarity are decoded. Memory location TEST Is 
now used as a temporary storaqe location to 
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decode the polarity. The half digit Is placed In 
the LSB of the MSD and negative polarity Is 
Indicated by placing a "I* 1 In the MSB of the MSD. 
The 8-channe I DAN conversion time Is 
approximately 320 ms with a 400 kHz clock 
frequency on the MCI 4433. 

SAMPLE AN0 HOLD 

The dual ramp A/D conversion process 
requires that the Input to the A/D remain 
constant during the conversion cycle. If It does 
not, a sample and hold circuit must be used 1o 
ensure a constant Input. 

EXPANSION OF TXE DAN 

Expanding the data acquisition network can 
be done by adding more MCI 4031 B analog 
multiplexers and modifying the software. Line 64 
must be changed 1o reflect the Increased number 
of channels. 
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Note* lor Truth Tabl^ 

Q3 - % digrt. low for "1", high for "0" 

Q2 Polarity "1" - positive. "0" negative 

00 - Out of range condition exists if QO 1, Whenusedin 
conjunction with Q3 the type of outot rang* condition 
is indicated, i.e.. 03 - OR or 03 1 - UR. 

When only segment b and c ol the decoder are connected 
to the Vi dtgii ol the display. 4, 0. 7 and 3 appear as 1. 
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8-CHANNEL DATA ACQUISITION NETWORK 

Shown above is the S-channel DAN discussed in 
this article. The board is t-btorola EXORciser 
compatible. Extra IC packages shown on this 
board are for the required interface to the 
EXORciser . 

The inputs for each channel are along top 
of the wirewrap board. The MC14433 A/D is 
the 24-pin package with its support com- 



ponents located adjacent to it. 
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Thlo proftram provide! a dynunlc tcctlrt** for tho following 
IntMrotod circuit* tXCo)r 

(t) Uric rotoo • KA*a>, ffO«. AIO, W. and Suclualvi. OH rat»a, 

(7.) auTfara and Invartaro, 

<3> rllp-flops and DlataMa LatcMo. 
Tha (VMbar of rata Input* can ba 1. 2,3,*, or 6. Sis pita* can 
b* taotit* nt ona tlma, Tha tadtlnr lo ona-atap oparatlon. 
By puBhlnr tha Go kay^ tha cotuputar will «nall?a tha output 
raaoonea of aech «rat4. and tall you which rata la rood, and 
what kind of rata It la. 

Ttoa taatlnr procedure li aa followa 

(1) Tha conputar aanda a aaquanea of ona byta test pattern 
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to the Input of the fate In the for* of 00.55.AA end 

FT haxadaclnel. 
C?) "'or enoh teat pattornr the co-nPuter reado iho outixit 

raooonoa of each fata, and cwnparaa It with trie Truth 

Tr*hle In Table 1. 
(3) After tha ?*Me haa been notched with the output 

reoQonae* the computer *lll dlaplay a naon*w".a on 

6 7-oar**nt LJCo (Llrht &-«lttlrv ;iode) . Sech LD 

reorsente a rata. The character displayed on '.he L2D 

reorreito the ty*va of rate, 
Tha required hardwereo ore a wlcroproceaaor, a peripheral 
Interface adapter (PIA), and an experimental IC socket, aa 
ahown In Plrure I. On tha PIA. tha A aide data line*, A0-A7. 
are prorranned aa ouiputa, and the ft aide data lines > B0-&7. 
ae Inouta, Following the eloeure of the Co key, a ae^uence 
of teat patterne are placed on data llrvee A0-A7, (hlch alno 
renraant the Inpute of the rate under tent. On tha B alda, 
the rete output reoponeea are read by data line* 0O-B5 
(36 and B7 are not ueed). Each output lo converted Into 
• binary value and compared with the Truth Takle In Table I. 
The result la dloployed aa a special character en the LsX, 
to repraant the type of ttate. If tha oharacter erraae *Uh 
the type of fate under teat, you have a eood rata, otherwine 
a bad one. The teot circuit connectlona for each type of 
lorlc rata, and flip-flap, are riven In Figure 2. 

The prorran In Llatlnr 1 i» written for tho Motorola 
r*2X6860'>2 kit. The epeclal ceta character for tho Truth Table 
occupy the ~e*tory lecetlone rrom 00 to OP hexadaclTnal. 
Sturtlrr tro-n the hexadecimal nddreee 10, the PIA le initialized 
to have eutputa on the A aide, and Inpute on the 3 aide. 
The 12) dlaplay la then blanked. Poll wl«r the ?1A Initialization, 
the keyboard lo tested by the routine KIT to determine whether 
or not the Co key hoe been preoMed. if It has bean cloaed, 
the ?£>T routine ia carried out. Attar each teat, tha teat 
pattern la Increased by a nunber of 55 h*xadacl«al. B1TSST 
than otoraa the bit output Tram each rate it Its own memory 
location, berinnliy at the addroso SICK. At the esue tloe, 
It shift! the previous bit output to the left of its seeory, 
Pol lowing the T387, the LSC routine convert! the binary value, 
atored at SIGN, into the gate character, end storee It at 
OlZWr locations. Plnally, the DSPLT routine dlaplay e 
6 charactara In 1*40* on the keyboard . The dloplayed ta*eaage 
will tell tha whole otory about the logic fate. 
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Previous first (8008)* s 
<8080* 6800)/ and second-a 
half (Z-80, 8085) generation 
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techniques which are useful 
easy on the 6809. Obviously 
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sonal computer environment* 
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U pward Coropatib 1 1 1 tu 

It is very easy for software 
houses to convert their 4800 code 
to the 6809 code, since th* 6809 
includes the 6800 architecture as 
a proper subset. and since the 
Motorola 6809 macroassembler fully 
accepts the old 6300 mnemonics. 
Nevertheless* a relatively-small 
amount of work on the original 
code will produce a better fin- 
ished product/ one that mill 
deliver truly improved performance 
on the 6809 (most "Z~80" code 
never osed the features of the Z- 
30. and thus most code performed 
virtually as well on an 8060;, 
Because the consumer mill purchase 
new code/ he has a right to demand 
aspects of programming which were 
oat feasible on older processors 
Ar<d/ if he looks at "6809 source 
code/' 1 he has every reason to 
expect to see the logically- 
consistent 6809 mnemonics/ and not 
their older 6800 equivalents. 



Aspec ts_ q± Qual itu 

Some important aspects of 
programming which are no-longer 
unreasonable are modular) re- 
entrant) and position-independent 
programming 

Posit i_Qn - Independence A program 
is said to be "position- 
independent" when it will run 
correctly when the exact same 
machine code is positioned arbi- 
trarily in memory. Such a program 
is useful in many different 
hardware configurations/ and might 
be copied from a disc into RAM 
when the Operating System first 
sees a request to use that system 
utility Positi on- independent 
programs rarely use absolute 
addressing/ instead indexed and 
relative modes are used heavily. 
In particular/ there should be no 
JMP <absolute> or JSR <absolute> 

instructions at all (each JMP or 
JSR should be replaced by an LBRA 
or LBSR/ respectively* requiring 
no more code); although position- 
independence does incur some run- 
time overhead* this is almost 



always preferable to a position- 
dependent program. When pointing 
at constants or tables within the 
program (consider/ for example/ 
t«x t-str ings for various console 
messages)/ the programmer should 
use the "program- counter -relative" 
(PCR> form of indexed addressing 
(which is position-independent); 
instead of loading an absolute 
address (which is not). 

Modular Proarammmo - Programming 
in modules is another indication 
of quality code/ whether for the 
4)809 or any other machine (unfor- 
tunately/ modular code is really 
tough on any 
mi cro >. A module 
e lemen t wh i c h 
disconnected from 
program/ either 
new environment* 
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early-generation 
is a program- 
can be easily 
the rest of the 
for re-use in a 
or for replace- 
ment (due to error in the origi- 
nal). A module is usually a sub- 
routine (although a subroutine is 
not necessarily a module); fre- 
quently* the programmer isolates 
reg ister— c hanges internal to the 
module from the calling routine 
(on the 6809 one would PSH all 
registers changed by the module/ 
do the work/ then PUL those same 
register values back, plus PC/ 
thus replacing the usual RTS). 
Isolating register changes in the 
called module to that module alone 
allows the code in the calling 
program to be more-easily analyzed 
since it can be assumed that all 
registers (except those specifi- 
cally used for parameter transfer) 
arc unchanged by each called 
module. This leaves the CPU 
registers free at each level for 
loop-counts/ address -com par isons/ 
etc. 

Local gtor^q e, A clean method for 
allocating "local* 4 storage is 
required both by 
independent programs 
modular code — local 
storage is used to 
only during execution 
(or called modules) 
released upon return, 
always a module will 
temporary storage than 
CPU registers, temporary storage 
is readily available from the 
. . 35 



position- 
as well as 
( temporary ) 
hold values 
of a module 
and is 
Almost 
need more 
just the 



stack area o 
desired amount 
cated by moving 
pointer down 
desired/ then 
end of the ro 
values stored 
eas i ly accessed 
the 3 tac k po 
m, S) Natural 1 
be passed fro 
caller either i 
the stack/ and 
technique does 
head > it is a 
parameters of 1 
of storage ujh 
provided by the 
CPU 



n the 6809 The 

of storage is alio- 

the hardware stack 

(LEAS -n,S> as 

back again at the 

utine (LEAS n#S>; 

in this area arts 

by indexing from 

inter (e g, » ADD# 

y, parameters can 

m and back to the 

n registers or on 

although the stack 

involve more over- 

lso extensible to n 

ength nil an amount 

ich could never be 

registers in any 



Q_ \ o b a _l_ Storage . Even in a modular 
environment there is need for 
"globals;" values which are acces- 
sible by many modules within a 
given system. These provide a 
convenient means for storing 
values from one invocation to 
another invocation of the same 
routine One appropriately 
position-independent global tech- 
nique is to locate the U— register 
at the present top-of-stac k, then 
move the stack pointer down past 
the space reserved for globals. 
By convention; all modules will 
preserve that same value for U 
when calling subordinate modules. 
Modules at all levels have identi- 
cal access to the globals* by per-* 
forming accesses indexed from the 
U-register <e. g., LDD cat/U). 

IlUt Interface Lfyel 

Granted that we have a well- 
designed program which uses modern 
programming practices! the 
position-independent module must 
still interface into hardware with 
some fixed characteristics which 
vary between systems. In fact, it 
must also interface the same sys- 
tem as it develops over time. 

Bfill'l Pflinl Yourself in. Software 
tends to change through time. 
Since later (corrected) versions 
of the same module mag well have 
routines positioned differently, 
it makes sense to list all 
externally-useful modules in a 
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table in the beginning of the 
overall module; typically/ a list 
o* LBRAs to the internal modules 
mill be sufficient (until Further 
standards are finished for 

automatically linking internal and 
external routines). 
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Just as interactive computer 
operation is far preferable to 
batch (still used by many com- 
panies and even CS schools^ unfor- 
tunately)/ multi-tasking capabil- 
ity is much preferable to the 
usual sing le-job-at-a-t ime system 
organization. Additionally! there 
is actual need for an interrupt- 
driven real-time environment to 
support a large number of computa- 
tionally trivial tasks around the 
home. These desired goals arm 
supported best by modular, re- 
entrant code/ using the same tech- 
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ooerat i on* 
access^ etc ) 
support the 
mul t i-task 



niques as described above* plus 
the small matter of a roulti^ 
tasking real-time Operating Sys- 
tem 

Th e O S , An operating system is 
the heart of a computer in the 
sense that it supports necessary 
(e. g , I/O; disc 

in such ways that 
desired re-entrant 
capabilities and 
relieve that support from the user 
programs In my opinion^ no pro- 
gram deserves the title ''Operating 
System" unless it does allocation 
of scarce CPU resources (e.g 
memory, storage* CPU time. I/O 
channels/ etc. ). Programs which 
enable the user to enter and exe- 
cute machine code are frequently 
called "debug monitors'* on micro- 
computers. These are all we will 
have for a while. But getting or 
writing a monitor with capabili- 
ties largely typical of those used 
on previous-generation micros 
should not blind us of our 
eventual goals: the real-time 
mul t i-task ing computer of the 
home. 
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• SOFTWARE CONTEST • 

$12,000.00+ 

AND GROWING » 



68 MICRO 

JOURNAL 

SOFTWARE 

CONTEST 



Prize list now at $12,000.00+ and growing. 

Prizes for each category will be: 

FIRST - Life Subscription 68 Micro Journal* 

SECOND - 6 year extension 68 Micro Journal" 

THIRD - 3 year extension 68 Micro Journal* 

4th- 10th 1 year extension 68 Micro Journal" 

The software must be utilities or serious 
softwarei of original design, to operate with the 
following CATEGORIES: 

TSC FLEX 6800 Disk System Mini Flex 

TSC FLEX 6800 Disk System FLEX Ver. 2.0 5" 

TSC FLEX 6600 Disk System Ver. 1.0 8" 

TSC FLEX 6809 Disk System Ver. 09 5» or 8" 

SSB Dos Version 5 

SSB Dos Version 4 or earlier 

SSB TSC FLEX Version 

PERC0M INDEX 

PERC0M MlnlDos+ 

HEMENWAY CP/68 Disk System 

MSI Disk Operating Systems 

SOFTWARE DYNAMICS S00S 

JPC TC-3 Cassette System 

ANY KC Standard Tape System 

BASIC Any 6800 Version 

BASIC Any 6809 Version 

There are sixteen (16) categories, as Indicated 
above. In addition we have other prizes donated 
by various vendors of 6800/09 products. As of 
the 15th of October 1979 over $12,000.00 In 
prizes has been pledged. 

GIMIX - Mainframe, value $798.19. 

SOUTHWEST TECHNICAL PRODUCTS O0RP (SWTPC) 
Computer 69/8, value $595.00. 

DIGITAL RESEARCH: C0hfUT6RS, 16K static memory 
board kit, value $295.00. 

JPC PR00UCTS, 1C-3 kit w/CFM-3 package; AO-16 
kit; CK7 kit, total value $190.00. 

STAR-KITS, Sat checkbook balancing software : 
Mini FLEX" or PERC0M Supar BASIC on disk, value 
$40.00. 
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MICROWARE Systems Corp, Package \ each: ABAS I C 
Compiler, ABAS I C Source Gen., ABAS I C Interpreter, 
LISP Interpreter; also 6 each RT/68 ROM OS and 6 
each 6800 Chess programs. Total value $1,005.00. 

SMOKE SIGNAL BROADCAST I NG , two J500.00 gift 
certificates for any SSB product. Categories 
eligible SSB DOS Ver. 4 or earlier and Ver. 5 
or later; total value SI, 000.00. 

LUCIOATA, 5 each PASCAL Ver, 2, 1 to each FLEX" 
category. Total value S 750. 00. 

00MPUTERWARE, 2 each S200.00 gift certificates 
for any Computerware software product- 1 gift 
certificate for best of SS8 disk BASIC and 1 gift 
certificate for best of Com puterwa re's Random 
BASIC. Total valje, S400.00. 

SSI, Schreier Software Index, choice of S100.00 
of SSI software. 

SOFTWARE DYNAMICS, 6800 BASIC Compiler, value 
S210.00. 

The MICRO WORKS, choice of any one Item, value up 
to S 179, 95. 

HEMENWAY ASSOCIATES, INC., Books, 3 each CP/68, 3 
each XA6809 Macro Cross Assembler, 3 each 
STRUBAL+ Compiler, lotal value S329.55. 

CER-C0MP Microcomputers, MlnlOlsk+ Olsk system 
(EPROM) and software on disk. Total value 
S89.00. 

TECHNICAL SYSTEMS CONSULTANTS (TSC), S250.00 
choice of any TSC software, for best of FLEX* 
entries. 



magazine or Journal (club newsletters and the 
like do not count as a commercial magazine or 
journa I )• 

I have tried to keep the rules simple. This 
should encourage the maximum participation In the 
contest. This Is another of the ways that we 
attempt to secure good material for the sole 
benefit of our readers. Also I believe that It 
will encourage those who have developed good 
software, to share with his or her fellow 6800/09 
users. By sharing we all profit. By working 
together, as has been In the past. It enables us 
as 6800/09 user to have a magazine that Is jjst 
for us. 

This contest was scheduled to close February 
15th, 1980. This will be the first anniversary 
of 68 Micro Journal". Prize winners will be 
announced In the April or July 1980 Issue of 68 
Micro Journa I "• 

NOTE: Due to the large amount of material being 
submitted, the contest may be extended for an 
additional 90 days (February to May). The prime 
consideration of this contest Is not time but 
good software. By this extension we can Include 
some excellent software, nearlng completion, that 
we would otherwise miss making available to our 
readers. 

ALL ENTRIES N0TIFIE0 AS FINAL PRIZE WINNING 
ENTRIES WILL BE REQUIRED TO SUBMIT MATERIAL (IN 
SOURCE AND BINARY) ON MEDIA OF CATEGORY USED. 
This will allow the Judges to assemble and run 
all winning programs, as submitted. 

All entries should be plainly marked 'CONTEST'!)! 



Final decision shall be delegated to a panel of 
judges selected by the staff of 68 Micro 
Journal*. All Judges decisions are final and each 
person submitting, shall by his or her submitting 
material for evaljatlon, acknowledge that they 
agree to abide by any and all rules of this 
contest, as published within the pages of 68 
Micro Journal". 

Programs and material submitted shal I be judged 
on the basis of good and workable software. 8y 
this we mean. It should do something useful and 
be needed by the average 6800/09 jser In the 
particular category. Size Is of little 
Importance, the most Important consideration will 
be how useful It Is. 

All material submitted shall remain the property 
of the original owner (who should be the author). 
Each submission shell contain a paragraph that 
states the material submitted Is of original 
design end the property of the person In whose 
name It Is submitted. 

It shell be understood that regardless of who 
wins or does not win a prize, all material 
submitted shell be authorized and eligible, to be 
published by 68 Micro Journal". Material 
published, which was not a winning entry, shell 
gain the author an extension to his or her 
subscription. Anyone may enter and It Is not a 
requirement that the person submitting material 
be a subscriber to 68 Micro Journal". Prizes 
will be awarded on the quality of the material 
submitted and being or not being a subscriber, 
will have no bearing. 

Authors should Indicate that the material has NOT 
been previously published In any commercial 



AAA CHICAGO COMPUTER 
CENTER 

120 Chestnut Lane 

Wheeling, IL 60090 

(312)459-0450 

6600 Specialist* /T\ 

Dealers for Glmlx ( ' ) 

Smoke Signal, SWTPC xl\ 

1 1 Vi digit Math Package 
with Fortran Type Formatting $100.00 

Business Basic Version R3 
with automatic line renumbering, 
print using* and more 50.00 

Fast Basic 
(by Mark Oata Products) 60.00 

Payroll (Process any number of 
employees; fast) 400.00 

Editor-Text Processor Version 2.0 
Specify Smoke. Flex 1,0 or 2.0, MSI. 
GMXBUG 100.00 

Smoke Signal Type OOS 
for MSI 60.00 

(Note; Above Basics have random disc files and were 
designed for Smoke disk; available on cassette if specified.) 

See Qimix Ad on page 3 
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DS-66 OIGISECTOR A. *SB-08 PflOM SYSTEM BOARD ^ B OB EPIIOM PROGRAMMER ^ u '0 UNIVERSAL I/O BOARO 

INNOVATIVE PRODUCTS FOR 6800 USERS 



DS-68 DIGISECTOR is a random access video digit 
izer featuring 256 x 256 picture element scan and 
64 levels of grey scale r with conversion times as low 
as 3 microseconds per pixel. It accepts either Inter- 
laced (NTSC) or non-interlaced (industrial) video 
input. Use it for computer portraiture, moving target 
Indicators, precision security systems, fast to slow 
scan conversion. ..with clever software, the Dlgi- 
sector can read just about anything. Truly a pro- 
fessional tool at a price you can afford. $169.95 




B-08 2708 EPROM PROGRAMMER Is a compact unit 
that fits In the 6800's I/O slot. A safety switch and 
LED indicator provide control over the high pro- 
gramming voltage generated on board. An industrial 
quality Textool socket and extended board height 
allow effortless PROM insertion and retrieval. Fully 
commented source listings of U2708 is Included in 
the Owner's Manual. $99.95 
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U2708 utility for testing, burning, verifying and 
copying 2708s in EPROM. $29.95 



PSB-08 PROM SYSTEM BOARD features 1K of high 
speed, low-power RAM and space for up to 8 2708 
EPROMs, both DIP-switch addressable to start on 
any 8K boundary in memory. The exclusive I/O 
select feature allows you to move I/O locations up to 
any unused 1 K block in the EPROM memory space. 
This permits memory expansion to a full 56K of 
contiguous user RAM. $11995 
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DM-85 DISK MIXER is an addon board for the 
Smoke Signal Broadcasting BFD68A Disk Con- 
troller which allows operation of both 8 11 and 5" 
drives. Controller mode (8** or 5") is selected on a 
drive-by drive basis, so any mix of 5" and 8 11 drives Is 
allowable. The 2 M x 3" PC board mounts Incon- 
spicously on the back of the BFD-68A. Its operation 
is completely transparent to software. An oscillo- 
scope Is required for the setup procedure. Kit Price: 
$39.95 



M6809 EMULATOR is a machine language program 
that will emulate all of the functions of the Motorola 
6809 third generation microprocessor. Developed 
for use on any 6800 system, the program allows soft- 
ware development and debugging. The 3K byte pro- 
gram is complete with a 6809 mini-monitor and 
single-step trace routines. Fully commented source 



listing included Specify Smoke Signal Broad- 
casting or FLEX™ disk, or KCS cassette. $49.95 
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UIO UNIVERSAL I/O BOARD helps you with your 
custom interfaces. It has space for a 40-pin wire 
wrap socket into which you may plug any of 
Motorola's 40 or 24-pin interlace chips. All data and 
control lines are connected to the appropriate edge 
connector pins. All other bus connections are 
brought out to a 16-pln socket pad. + 5 volt regulator 
and all Molex connectors are provided; regulated 
♦ 5 and ground are bused among the locations for 
up to 35 14-pin ICs. $24.95 



SjfHJ©\^j^' P.O. BOX 1110, DEL MAR, CA 92014 714-942-2400 
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EPROM PROGRAMMER 
Model EP-2A-79 




VOHWARE AVMLA6U FOR F-B, 600U 6800, 
60AS, 7 60, 6502, WM-1. 1*H, 2650 
LPftOM typ* iv >rlrctrd by 4 PPrtonjhiy module 
which pJuri <nio iKr Iron! of ihc proRr4mm«r 
Po*«r requirement jft? 115 VAC. SO/60 M/ jt 15 
wjiu II U «uppl*d v*nb a 36 iiuK ftbbon cible 
tot foftneotnpc lo tfW^orompurrr Require* V | 
IU poiu Priced 41 il55 nkith one set o* 
v<»liw*rr P<<rx?r>4lity module jt«? ihown beU>w 



f art No. 




froff*m* 


P»kf 


PM-0 


1M5 


2700 


$15 00 


K»| 




2704. J** 


15 00 


PM-1 




2732 


MOO 


PM-i 


TM5 


2716 


1500 


PM 4 


TMS 


25i2 


SO 00 


CM.i 


TM5 


2516 2716.2750 


1500 



Optimal Technology, Inc. 

Blue Wood 127, Earlysville, VA 22936 
Phone (604) 973-S482 



NEW PR0OUCT 

Jim Schreler of SSI, The Schreler Software Index, 
announces the addition of FLEX2* applications 
programs to their growing software stock. 

Among the new offerings are the fol lowing: 68 ot 
the 76 programs In Poole's and Borcher's 'Some 
Common BASIC Programs 1 (2 Disk); an Income 
Expense Ledger allowing 18 expense accounts and 8 
Income accounts; a complete Genealogy Program 
allowing up to 5 generations per disk; and a 
Professional Rodeo Cowboy's System allowing 
calculations of Entry Fees and Rodeo Payoffs, as 
well as Rodeo Bookeeplng (PRCAK 

The above software Items are available for the 5" 
minidisk only. Price per disk Is (16.95. A 3 
ring plastic notebook holder with documentation 
Is Included, Additional Information can be 
secured from: 

SSI f The Schreler Software Index, 4327 East Grove 
Street, Phoenix, AZ 85040. 



6800 SYSTEM SOFTWARE 

Unmatched • Field Proven • Documented • Industry Wide 



SD0S Ty 

A totally Interrupt-drlven (both disk and other peripherals) disk 
operating system, including type-ahead. Provides device independent, 
byte addressable random files. Supports any mixture of disk drives up 
to 2.5 BILLION bytes per drive, Olsk tiles can grow dynamically to 
match application needs. Automatic, overlapped read-ahead on 
sequential (lies and LRU sector Duller pooling on random-access files 
optimize disk I/O. System utilities allow operator lite manipulation, 
disk initialization, backup with wildcard life selection, and disk 
structure repair facilities to handle the Infrequent but unavoidable 
disasters that occur in the real world Turn-key application systems can 
be easily twill, coupled with SO Business Basic 242 pages of 
documentation. 

IDB 

A RAM or EPflOM-based assembly language debugger. Provides 
single-step with register display, multiple real-time conditional 
breakpoints, memory dump, multiple data display and entry modes. 
Can be used to debug Interrupt-drlven code. 39 pages ol 
documentation. 

6600 Hardware supported: 

Conrac Model 480 (AMI MDC) + ICOM floppy 

WaveMate + Perse* floppy (1771 4- OMA) 

Electronics Product Associates + ICOM floppy 

Motorola EXORclsor + EXORrflsk I or II 

SWTP + mini or DMAP floppy (FLEX) 

CMI 6800 + Winchester (16M) + Calcomp floppy (1771 + OMA) 

MSI 6600 + FO-8 mini-floppy or tOM cartridge disk 

Mizar labs + double density Mlcropoiis drives (1791 + OMA) 

SSB Chieftain— mini or 8-inch floppy 

Computer and Oata Machines (England) 



BUSINESS BASIC COMPILER 

A super fast application oriented BASIC 10 digit BCO for values to 100 
million dollars with pennies. Random access lo variable size, variable 
content records. Long, meaningful variable names, formatted output, 
I F-T HEN-ELSE with multiple statements per line, and error-trapping 
make this BASIC extremely powerful Complied code, automatic 
integer optimization, and fast floating point make applications written 
in SO Basic run faster than on virtually any other microcomputer, and 
protect the source code of the application. 104 pages of documentation 

EDIT 

A powerful and easy to use text editor with change, delete, insert, and 
remove commands Automatic display of text or context changes, 
macro lacllllles for complex or repetitive editing. 44 pages of 
documentation 

ASM 

A lovely 2 pass assembler with conditional assembly, long labels, 
symbol table dump and cross-reference, error cross-reference, 
extensive arithmetic and listing control. 103 pages ol documentation. 

Write lor a tree catalogue or contact the hardware manufacturer. 
All SO software comes with a t year warranty. 



SOFTWARE DYNAMICS 

2111 W. Crescent. Suite G 
Anaheim, CA 92604 
(714) 635-4760 
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Sgy" 16K EPROM CARD-S 100 BUSS ~V 8K LOW POWER RAM KIT-S 100 BUSS 

SALE ^ 










s 59.95 

KIT 



OUR 

BEST 

SELLING 

KIT! 



USES 2708 s! 

Thousands of personal and business systems around 
the world use this board with complete satisfaction. 
Puts 16K of software on line at ALL TIMES! Kit features 
a top quality soldermasked and silk-screened PC board 
and first run parts and sockets All parts (except 2708 , s} 
are included Any number of EPROM locations may be 
disabled to avoid any memory conflicts. Fully buffered 
and has WAIT STATE capabilities. 



OUR 450NS 270B S 
ARE S8 95 EA. WITH 
PURCHASE OF KIT 



ASSEMBLED 

AND FULLY TESTED 

ADD (25 







$ 119 5 K ° 



jk. 



{450 NS RAMS!) 



Thousands of computer systems rely on this rugged, work 
horse, RAM board Designed for error-free, NO HASSLE, 
systems use 

KIT FEATURES: 

l Doubled siOfcd PC ©oard with voider 

mask and silk screen fay out Gold 

plated com act fingat* 
7 AH sockets included 

3 Folly buffered on nil address Jind Jala 
lines 

4 Phantom »s jumper selectable to pin 
67 
FOUR 7805 regulators are provided 

'■n r.artl 



Blank PC Board w/ Documentation 

*»« 

Low Profile Socket Sat 13.50 

Support IC'S (Tit & Ruguifilorsi 

t»,7| 

Bypass CAP's {Disc & Taniaiumi) 

MJO 



ASSEMBLED AND FULLY 
BURNED IN ADD $30 






-•1 

nil 
-•• 

• • i 

• *•••< 



• •• i 

••• i 



• •*■ 

• «•■ 



16K STATIC HAM KIT-S 100 BUSS 

PRICE CUTt 




race 



16K STATIC RAM SS-50 BUSS 

PRICE CUT! 



nniipnn i> 



FULLY 

STATIC, AT 

DYNAMIC PRICES 

WHY TNI 1114 HAM CH»*T 
W* Iftrt I n* 21 1 •* witi U»f h» n«Pl irKkifttry iLartdam 
n*M trno pa* it* ?ifr? *••> i r>i nwi p*>t* 



2 1 1* w fullv static 1 HMMatiwms i*» om* 

**y n^auniM 1MDO Bum* Wa« an tmvn ih# 
HOtittOtt atotw* atwul M»rtW Dynamic Ham 
Bcwm riiwinfl mouW* wrth DMA and FLOPPY 
OISC DfltVES Who n«Mdi ih*w hmtii of 
ptoW^m*' And itn*»¥ •*«** among 0*.hpr 4K 
M JIIK RAUi Hi* 3 t 1 4 ■! af<* QM** Not a» 4* Btajta 
R*-m Mr CfMltd Mfbal 1 Sam* Of lit* OttW 4K 1 
hn* tl p ^ aal chip *«***• rmaa vtd * ftftou* l<ming 
#VHfo«rt flMt H Cf aiui •« Oyn«m*c PAM t So*** 
Of CHI' CDtnpMilOr 1 !*K lKttfdl UMirM*v 

dwen BulfN?tutf Th*iriHi*ift*t>Nt¥i^<c*i 

cfK»C4 let* ■ trmitim tiiw. ■Tr>IQh1t(KW*rd 0»>gn 

BLANK PC BOARD W DAT A 133 
LOW PROFILE SOCKET SET $12 ASSEMBLED ft TESTED- 
L SUPPORT JCS 4 CAPS— fit .M 



MIT rE* I . 

1 *d'J'*K\«hi* a* lout Mfwraie 4H Qloctft 

7 OH BOARD BANK MlU t riicmtiy 

lOoitwnco ^a^danTi Atitfw* uO»*i SiT?H on 

■Ml 

3 U»f 21 14 HVWSt 4K Si*** n*m* 

4 on Board sELCCMUiT wait states 

5 Duutya ntfrd PC Board *<rh tokta m«h nun 
MM Kf*«nKl tefftut C»aldpf»Tiw1 pqnlflrl lmg*»t 
a An pftJtft*** ftfiiJ di!« I met fidMy bull'tf**! 

7 Kt AciudH All pull «mi k>c*»h 

» MHAHtCVM ^ jamewtd Id PIN S7 

« LOW POWER und#f^»i»if*T¥l*lCAL»*Off.ih# 

«a voii Pmm 

ro 6i«nt PC Bkufd cv bt pofh>ijit« ■> any 
mullfpto ol 4K 



ADOS30 
J 



$ 275 



KIT 



be^Bi^wawr-rniW|B|W***"'3<li*^r4 

t , • , ^ F* : a** * r f * . r* . f . * " , 



\"*»a« 

■♦•#• 

••• »• 



FULLY STATIC 
AT DYNAMIC PRICES 



KIT FEATURES; 




FOR SWTPC 
6800 BUSS! 



ASSEMBLED AND 
TESTED - S30 



BLANK PC BOARD -120 



Addressable on 16K Boundaries 

Uses 2114 Static Ram 

Runs at Full Speed 

Double sided PC Board Solder 

mask and silk screened layout. 

Gold fingers. 

All Parts and Sockets included 

Low Power: Under 2 Amps 

Typical 

COMPLETE SOCKET SET -112 



SUPPORT ICS AMD CAPS >S1«.W 



••el 
• .*•< 

■■••1 

*-*e« 

• »»< 

-'••I 



■•■*« 



• •-- 






• •- 






S*t00 280 CPU CARD 

ASSEMBLED AND TESTED* READY TO USE! Over 3 years ol 
design eflons were required to produce a TRUE S- 100 280 CPU 
ai a genuinely bargain price 1 * ajM7l SI RQ35 
FEATURES m l " r "- 1 « *»^ 

* 2 or a MHZ Operatwin 

* Gnneraies MWRlTE, %q ne trgnl panel requtrftd 

* Jump on ro»ot capability 

* 8060 Signals emulated lor S-tOD compalnbiiUy 

* Top Quality PCB. Silk Scraenoct Soldof Masked. Gold P*atod Contact 
fmga*s 



PatfadFor 



LOW POWER - 250NS 

2114 RAM SALE! 

4K STATIC RAMS MAJOR BRAND N£W PARTS 
These are the most sought after 2114*3. LOW POWER and 
250NS FAST jyso „ or Q p Qr 155 

SPECIAL SALE: tWtr laaaMa IK« ngftl 10 limit qu«nnt<*i 1 



PROC. TECH. QUITS THE MICROPROCESSOR BUSINESS 1 

FACTORY CLOSE OUT - SPECIAL PURCHASEI 

MfKHA 

16K S-100 Dynamic Ram Board - S1 49.- 

ORIGINALLY PRICED AT S429 each! 

We purchased the remaining inventory of PTs popular 
16K Ram Board when they recently closed their plant. 
Oonl miss the boat! These are brand newjully tested, 
ASSEMBLED and ready to go. All are sold with our 
standard 90 day limited warranty!! 

72 Page Full Manual, Included Free! 



NOT ASSOCIATED WITH DIGITAL HESEARCH OF CALIFORNIA, THE SUPPLIERS OF CPM SOFTWARE 



r 



^ 



Digital Research: Computers 

m (OF TEXAS) ^ 

Box 401565 • GARLAND. TEXAS 75040 « (214) 494-1505 



P.O 




TERMS: Add SI 00 po«fag*. w* pay bfltflnc* Ortftri undar 1 16 add ?6f 
hamiJirn; NoCOD Wa accapl V<bh. U**l#Chorg#, And Am mi can Expf*ti 
card* T»n Aa& add&STai »"Of»»(jfi oi<lm la^capT Canada a(W20% P A K90 
Day Wonrr Back Guvani** on ajl i|«ri« 



1 1| f $1111 1 J 



^l't 



tlittlMHilMI(tl(l»lltllllt**M*llllllt»l*lli* 1^* 

• •♦••••••••••••••a#a#aaa#aa»aa»a>»*a»»aa»aa»aa»» # A * 



o 



5-1/4" Minidisk — Soft or Hard Sector 



s 

A 
V 
E 





DISK 

5" Soft Sector S3, 09 each 

5" 10-16 Sector $3.09 each 

8" Single Side, Double 

Density $4.50 each 

8" Double Side, Double 

Density $6.50 each 

5" Plastic Box-plus S3 .00 

Minimum Order 10(1 box) 



minidisk 






SOUTH EAST MEDIA SUPPLY 

6131 Airways Blvd. 6 1 5-892- 1 328 

Chattanooga, TN 37421 




D 
I 

S 
K 
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H H H Enterprises 

Box 493, Laurel, Md 

20810 301-953-1155 

SUPER SYSTEMS 



SUPER SYSTEMS come in almost any size 
and consist of: 

1) Super box, 32k ram T dual 5" floppies, 
an ADM-3A terminal, Smartbug, Random 
basic, text editor, assembler, documenta- 
tion and cables. All for $3,840. 

2) Super Box, 48k ram, dual 8" floppies, 
Random basic, text ed,, assembler, word 
processor, Anadex DP-8000 printer, 
documentation and cables. All for $5,900, 

3) "DELUX" (the really big system); Super 
box, 128k software control! ram, 4ea double 
sided T double density, 8" disk drives, Spin- 
writter printer, color terminal (80X48 lines, 
color graphics, etc), Random basic, Ran- 
dom compiler, Fortran, Spirit, Pascal, 
A/BASIC family, 4 serial ports, 8 par. ports, 
and all for only $16,500. 

All systems are tested and integrated at 
Laurel, Md. They are then demonstrated 
and/or packed for shipment. All software is 
setup for proper port operation and com- 
patability. 

SPECIAL! SPECIAL] SPECIAL! 

A limited supply of Memorex Mod. 552, 
double density, double sided drives. These 
drives are rebuilt by the factory and carry a 
90 day limited warranty. Delivery is stock to 
1 5 days. Special price of $625!!!!! More than 
30% off the retail price. The supply is limited 
so first come first served. 

Mastercharge and Visa accepted on all 
our product line. Call and ask about our 
scientific systems with the Bit Pad and 
Plotters. 

Smartbug is trademark of Smoke Signal 
Broadcasting, Bit Pad is trademark of Sunv 
magraphics. 



See GIMIX Ad. Page 3 



H H H ENTERPRISES 

BOX 493, Laurel, MO. 

ZIP 20810 
PHONE 301-953-1155 



CT-64 CT-1024 

• FAST! Average Screen Writing Speed: 19K 
baud 

• Memory Mapped Video Adapter for your CT-64 
or CT-1024. 

• Just plug it in and go, 

• The terminal works like normal until the 
suppliedoutput routine is used, thenthe CT-64 
or CT-1024 display works at processor speed. 

• The J.B.I. Video Boardtakes 1 mainSSSOslot. 

• Video Memory can be dip switch selected to 
any 1K memory slot. 

• CombinetheJ B I Video Boardwithourupand 
coming pseudo graphics adapter board and 
you put new life into the old CT-64. 

• The J.B.I. Video Board comes built and is 
jumper selectable for either the CT-64 or 
CT-1024. 

• If yourterminal is CT- 1 024 we need to know if it 
is a standard 32 characters per line; or has 
been modified for 64 characters per line. 

• SHIPPING NOW! 

The J.BJ. Video Board sells for: 
$169.00 with your 21L02 S 
$179,00 with our 21L02S 
(8*21 L02S are required) 

We have been a dealer for SWTPC sirKe 1976. 

Johnson Micro Computer 

2607 E. Charleston 
Las Vegas, Nevada 89104 

1-702*384-3354 

Mastercharge and Visa accepted 
Dealer inquiries invited 



ED SMITH'S SOFTWARE WORKS 

ANNOUNCES %££8> J&Q 

AN M66O0 SYSTEM RELOCATABLE RECURSIVE 
MACROASSEMBLER * LIMKIN0 LOADER 

ATTENTION ALL PROGRAMMERS: it you have 

bean looking for an eaeemblsr with real macro capabilities, than 
31'ftjoM. u the one for you. 

Character replacement la the orux of maoro expanalon. &2L]tiL&C 
allows unlimited ohareciar replacement In any field of a macro 
model eutemsnt. UHiti argument notation oan •pacify replace- 
ment from any field, eubf isld. eubliet or substring of the maoro oall 
eutement. $30frU.d'e eet or macro directions eupporte botn global 
and local eat eymboie. Sat symbols oan be baaed on either arlthmatlo 
expreeeione or oharaoter expressions. Maoro model eutement* oan 
determine attribute* of eet eymboie or maoro argument* rattfAfl 
alio we macroa to define new macro* and to oall other maoro*. Macro 
call* oan be reoureive. that le. a macro may oall iteeif. 

vt contains a mini oo-reeident editor, alio we epoottng if 
desired* support* lneert file*, retains T8C Text Editor eouroe code 
compatabiUty. plua many other programmer convenience feature*. 

can be furnlAhed on oaaaetta or minifloppy in either BBB 
or Mini Flex format. Come* complete with Unking loader, Initruo- 
tlon Manual/ Programmer* Oulde dr an extensively oommenud 
assembly listing 



a 0600 te esoa arost 
▼anion cf 
*r»ilAfeie in Jvn* 



imblir 
ill be 



MOofUt c*ae»u* I1AO 00 

UOAfUVD SSBdlae §16000 
M6AIUWF PLZXClas 1160 00 
Spvcsly Mini' or Vat 2.0 
Order directly by oheok or MC/viea. California resident* add 6% 
ealee tax. Customers outside of U.S. or Canada add $6 for air postags 
dr handling. 
Dialer tn^ittes wekamt. FLEX »» "««»nuiili ©i TSC 



P.O, 



Ed Smith's SOFTWARE WOBX3 

Box 339, Redondo Beach, CA 90277, (213) 373-3360 
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Software Source Books 



TM 



Combining detailed descriptions with complete source listings, these 
books explain the internal operations and algorithms used in Hemermay 
Associated popular systems software . 

How much would such a complete software resource cost? If you f ve seen 
the PAPERBYTE books by Jack Hemenway and Robert Grappel you know how 
inexpensive they can be. And now you can have the companion volumes to the 
RA6800ML macro assembler and LINK6 8 linking loader books. 

Remember, these are not Just books: they are SoftwareSourceBooks 

complete Software resources! Order them today; VISA and MasterCharge 
accepted . _ 

TM 

flP/fift QPRRATTMfl SYSTEM 



PIP Peripheral Interchange 

Program transfers data 

between physical devices 

Wildcard Filenames and Extensions 

Relocatable anywhere in 

Memory 

Extended Instruction set 

includes 6809-type instructions 

(PSHX, PULX, etc) 



Device-independent I/O 
Random and Sequential Files 
Fits in less than 8K 
Chaining and overlaying 
Single Supervisor Call 
furnishes all DOS services 
Easily interfaced to new 
devices and peripherals 
Dynamic file allocation 

TM 



STRUctured BAsic Language (STRUBAL+"' ) COMPILER 
for both business and scientific uses 



to 



Variable precision from 4 

14 digits 

Structured Programming forms 

Produces Relocatable and 

linkable code 

COMMON and DUMMY sections 



Extensibility 

String Handling 

Full scientific package 

Data structures with 

mixed data types 



mm 



Macro Linking Cross Assembler 



Runs on any M6800 
Full Macro facilities 
COMMON section for the 

eroduction of ROMable code 
onditional Assembly 



* Generates linkable and 
relocatable code 

* Sorted Symbol table listing 

* Hash-coded Symbol table 
for speed 



Hemenway Associates Inc. 101 Tremont St. Boston MA 02108 
Name Title Company 



Street City State Zip 

( ) Check enclosed in the amount of $ 

(. ) Bill VISA ( ) Bill MasterCharge 

Card No Exp. Date. . . . 

Please send the following books; 



I 



Add $0.75 per book to cover postage and handling 
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SURPLUS ELECTRONICS 



ASCII 




ASCII 



WITH FLEX DRIVERS® 

IBM SELECTRIC 

BASED I/O TERMINAL 

WITH ASCII CONVERSION 

INSTALLED $645.00 



• Tape Drives • Cable 

• Cassette Drives • Wire 

• Power Supplies 12V15A, 12V25A, 
5V35A Others, • Displays 

• Cabinets • XFMRS • Heat 
Sinks • Printers • Components 

Many other items. SEND $1.00 FOR 
CATALOG. REFUNDABLE FIRST ORDER 

WORLDWIDE ELECT. INC. 
130 Northeastern Blvd. 
Nashua, NH 03060 
Phone orders accepted using VISA 
or MC. CALL 603-889-7661 



6800 BASIC CROSS 
REFERENCE 



Greatly reduce the time to examine and 
modify a BASIC program with this complete 
CROSS REFERENCE listing of a BASIC 
program. 

Reads a BASIC program from disc and 
selectively provides source listing and com- 
plete SORTED CROSS REFERENCE of all 
VARIABLES - FUNCTIONS - GOTO and 
GOSUB statements. 

Program is written in assembler using 
SMOKE SIGNAL MINI DISK SYSTEM. 
Specify aseitherTSC or CO-RES assembly 
source format. 

Complete source and object is on a 5V4 mini 
diskette for $14.95. 

FRANK SCHIELE 

1375 TOBIAS DRIVE 
CHULA VISTA CA. 92011 



-FINALLY. A 

OF3^JHUPHOMI 
( N^+i2/' tWTIHBYTE! 



6800 AUTOMATIC TELEPHONE DIALER 

PROGRAM $9.95 postpaid 

Have your 680t system dial your phone • Uses 
only 5 external components • Stores 650 variable 
lengih phone numbers • Operales in less lhan IK 
bytes of memory 

Includes: Paper tape in M»kbug* formal and ob- 
feci to<f<» • Ortutt diagram and instructions 
• Instructions for adapimg to oiher bflOi systems 



6800 TELEPHONE ANSWERING DEVICE 
PROGRAM $4.95 postpaid 

Have your 6800 system answer your phone and 
record messages automatically Compatible with 
any 6800 system. 

Includes: Assembly listing and object code • Clr- 
cuft diagram and instructions 

Write to: SOFTWARE EXCHANGE 
2681 PETERBORO 
W. BLOOMFIELD, MICH. 48033 

Mikiiujt* i* J rrfcftlcrrd tr Jd*m*rk ol Mt jtcmilj inc. 




C0MPUTERWARE 



DOS 



Same great features as 
SSB'S DOS 68.51!!! 



Also 
on the 
horizon 



MONITOR 



compatible with new 
SWTPC CPU-con- 
tains SSB'S disk 
boot software 



EDITOR 

ASSEMBLER 

TEXT PROCESSOR 



Random BASIC 

of course! 



write for information 



COMPUTERWARE 
{714)436^3512 



P.O.Box 668 
Encinitas* CA 92024 
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SUPER 
SOFTWARE! 

MICROWARE 6800 SOFTWARE IS 
INNOVATION AND PERFORMANCE 



LISP interpreter 

The programming language USP offers exciting new possibilities for 
microcomputer applications A highly interactive Interpreter thai uses 
list-type dala structures which are simultaneously dala and executable 
instructions LISP features an unusual structured, recursive function* 
oriented syntax Widely used lor processing, artificial intelligence, 
education, simulation symbolic, and computer-aided design, 6800 
LISP requires a minimum of 12K RAM 
Price $75,00 

A/BASlC Compiler 

The aver-growing A/BASIC lamily is Ihreatanmg old "fashioned 
assembly language programming in a big way Thts BASIC compiler 
generates pure. fasl. elftCienl 6800 machine language Irom easy to 
write BASIC source programs Uses ultra fasl inleger malh. extended 
string functions, boolean operaiors and reaMime operations Output rs 
ROMable and RUNS WITHOUT ANY RUNTIME PACKAGE Disk ver- 
sions have disk I/O statements end require 12K memory and host OOS 
Cassetle version runs m 8K and requires RT/68 operating system 
Price: Disk Extended Version 2 t S150.00 
Cassette Version 1 165,00 

A/BASIC Source Generator 

An "edd*orV* oplion lor A/BASIC Compiler disk versions that adds an 
extra Ihird pass which generates a full assembly-language outpul 
Itsltng AND essembfy language source file Uses original BASIC names 
and inserts BASIC source Unes as comments SSB and SWTPC 
M mil lex version available 
Price: $75.00 

A/BASIC Interpreter 

Hare il is— a super-fasl A/BASIC interpreter thai is source-compatible 
with our A/BASIC compiler' Now you can interactively edil. execute 
and debug A/BASIC programs wilh the ease of an interpreter— -ihen 
compile to super elfloeni machine language Also a superb stand- 
alone applications and conlrol-orlented interpreter Requires 8K RAM 
The cassetle version is perfect tor Molorola D? Kits 
Price $75 00 

RT/68 Real Time Operating System 

MIKBUG— compatible ROM thai combines an Improved monitor/ 
debugger with a powerful multitasking real-time operating syslem 
Supports up to 16 concurrent tasks al 8 priority revels plus real time 
clock and inlerrupt conlrol Thousands in use since 1976 handling all 
types 01 applications Available on 6830 (MIKBUG-type)or 2708 
(EPROM-type) ROM Manual is a classic on 6600 real-lime applications 
end contains a full source program listing 
Price: RT68MX (6830) $55.00 
RT68MXP {2708} $55 00 

6800 CHESS 

A challenging chess program for the 6800 Two seleclabte difficulty 
levels Displays formatted chess board on standard terminals Re- 
quires 8K memory Machine language wilh A/BASIC source lisiing 
Price $50 00 



Ov» »o1tttara 1% »vanir>« tor moti ootftMr 6900 tyttamt op csssono or 0<«k*n« 
unlatt Otr*tw«s« notod 0»«k vtrfttOnl «v«l«<)to or* S S B SWTPC or Mc*wo* 
MOOS P««m« specify *ti«ch ymi rtQtftr* Pftor* ofO«* ir» «*«a>m*d w#«ecepi 
MASTERCHAHQE sno VJSA W* try to «*■? Ordvi «*hm 24 hourm of rNeir) 
PSmmwm c»l or wr«M tt you require sdddionel tntormeDen or our free cslitog 
M.cro*art so**«r« n •*•*•&• to* OEM *«xJ custom «po*<*«>>i 



MICROWARE 

SVSJl-MS (XH«l*Ol< VI W>N 



P O BOX 4ttS 

DES MOINES. IA 50304 
(515) 285.6121 



'68' MICRO JOURNAL 

<*> The only ALL 6800 Computer Magazine. 
if More 6800 material than all the others com- 
bined: 

MAGAZINE COMPARISON 

(2 years) 

Monthly Averages 

6800 Articles 

TOTAL 
KB BYTE CC DOBB'S PAGES 

7.8 6.4 2.7 2.2 19.1 ea. mo. 

Average cost for all four each month; $5.88 

(Based on advertised 1-year subscription price) 

'68' cost per month: $1.21 

That's Right! Much, Much More 

for About 

1/5 the Cost! 

1-Year $1 4.50 2 Years $26.00 3 Years $36.50 

OK, PLEASE ENTER MY SUBSCRIPTION 
Bill My: Master Charge \J — VISA □ 

Card # Exp. Data 

For □ 1-Year □ 2 Years □ 3 Years 
Enclosed: $ 



Name 



Street 
Ctty_ 



.State. 



^ip- 



My Computer fs:_ 



88 MICRO JOURNAL 
3018 Himflt fload 
HIX80N, TTI 37343 



Foreign surface add $9.50 per year. 
Foreign Air Mail add $29.00 per year. 




^"^^fflc^ 




& 
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NOW INDUSTRIAL QUALITY AT LOW COST 

FROM THOMAS INSTRUMENTATION 



Industrial system boards are now available separately for OEM, prototyping or hobbyist applications. 
Shipped from stock, these are the same quality cards used in monitors and machine tool controls 
designed for GM, LTI, and General Electric. All cards are SS-50 buss compatible and are suitable for 
dedicated applications. The CPU card and the Video RAM Card may be combined on a Tl backplane 
as a stand-alone micro — ideal for prototypes or hobbyists. ATTENTION OEM's: If you have a control 
data acquisition, monitoring, or other microprocessor application. Check with Tl for more information 
about custom software design for the Tl CPU or any other 6800 series system. Tl also has non-SS-50 
buss single board 6800 systems. 



SS-50 SUPER CPU 

• SS-50 or stand alone computer 

• 1K of RAM al SA000 I/O on board at $A400 (Relocalabie) 

• 2K Monitor (Mikbug compatible) m 2708 EPROM 

• 2 8 bit parallel ports wilh 2 control bils and power 

• RS-232 ACIA port. 2nd TTL ACIA oplional 

• 3 16 bit counter limers (expandable to 6 add 2nd 6840) 

• 128 byte RAM at 0000 js jumper selectable 

• Baltery back-up for 32 byles of RAM 

• Plug back to back with Video RAM for Stand alone micro or 
customized smart terminal 

ASSEMBLED S195.00 
CARD AND DOCUMENTATION $49.00 



SS-50 VIDEO RAM J - „ „ _ „ ^ .,£& 

• Fully synchronous operation — No jitler .^ jg#x* 3 gg fjb jjj fih j j > J i & 

• 7 by 9 Characters Programmable reverse video ''- "'" u " • ' l ■ ] I 

• Full 128 Character ASCII set |t m l mi m * r' 

• 1K of memory can be mapped to any 1K boundary 5J Jf g| g? ffi j i' 

• Full documentation includes software (Replaces OUTEE) — '~' "'" '' * 

ASSEMBLED S149 00 lilt* * ft S\ « S tiP§ » 

CARD, CRYSTAL and DOCUMENTATION S3900 jfcfiHhP*™ U* * ^ ^ " t* 

TJ SS-50 Wire-Wrap Card 24.00 

Tl SS-50 Parallel I/O Card 95.00 

Card only 35.00 

GIMIX 16K Static RAM w/Soft addressing 368.00 

GIMIX 16 RAM without Soft addressing 298.00 

3, 4, 7 SLOT Backplanes (per slot) 4.00 

Tl cards available from stock 

THOMAS 

INSTRUMENTATION „_. _„ _^„ 

DEALERS FOR 

168-8th Street, Avalon, N.J. 08202 
^^ Phone (609) 967-4280 ^^ GIMIX SWTPC SSB 

VISA 




CALL FOR DEALER, OEM. AND QUANTITY PRICES 
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COMPUTERWARE 

6800 Specialists Since 1975 



i 



Small Business Software 



all run on 5" or 8" disk 



D 



•NEW* 

Accounts Receivabie $149 

Same comprehensive features 
as commercial system without 
invoicing and statement billing 

Accounts Payable S149 

Cash Requirements Projection; 
detail, summary & YTD 
reporting; audit trails 

Payroll S149 

additional State codes S50 

All Federal & Calif, tax calcul- 
ations; extensive detail & 
summary reporting 



Inventory $89.95 

Over 1 ,000 items on a 5 M disk 

Cash Flow Bookkeeping $99.95 

Detail & Summary reports for 
user*defined expense ledger 



Mailing System 

User-defined codes for 
selective sorting 



$89.95 



watch for our 



6809 Software 

DOS, Monitor, 
Random BASIC 
etc. 



^Commercial Systems A 



Inventory Control $750 

with Order Entry 

Bill of Material, Re-order reports; 
multiple price levels, audit trails; 
Where-Used & Parts Shortage 
reports; detail & summary 
reporting 



Accounts Receivable $600 
with Invoicing 

Extensive report capabilities 
including Aged & Overdue 
reports, statement billing; audit 
trails; comprehensive invoice 
entry & posting 



NEW 



$500 



Payroll 

All Federal tax options; 
Automatic deduction capabilities; 
Vacation & sick pay calculations; 
Extensive detail and summary 
reporting; 

complete payroll register; 
Password protection. 
State tax processing $75.00 



Write for complete 
system descriptions and 
hardware requirements 



(Development Tools J 



RENBAS $24.95 

with source on disk $34.95 
renumbers BASIC programs 
resolves line references 

XREF $24.95 

with source on disk $34.95 

assembly language program 
cross reference 



'NEW 




BASREF 


S34.95 


with source on disk 


$44.95 


cross reference of BASIC 




program tine nos & variables 


MUST FOR BASIC PROGRAMMER 



Random BASIC $99.95 

PRINT USING, EDIT, ON ERROR, 
direct random record access 



PROM BASIC $100.00 

8K ANSI BASIC, prommable 
features of cassette BASIC 

Cassette BASIC $34.95 

file handling, 9 digit accuracy, 
twice as fast as SWTPC 



COMPUTERWARE 

P.O. Box 668 

1512 Encinitas Blvd. 

Encinitas, CA 92024 

(714)436-3512 



6800 Hardware too! 

Smoke Signal Broadcasting, 
Centronics, Anadex, NEC, 
SOROC, Micro Works, 
SWTPC, Ledex 
Sanyo, Seals 
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SMOKE SIGNAL BROADCASTING 



THE SMOKE WRITER (VDB-1) 

The SSli SMOKE WRITER incorporates the latest advances in electronic 
technology to bring you ami the SS-50 bus a truly unique video display board. 

The SMOKE WRITER uses the MC6845 CRT Controller chip and provides 
total control over the display format . 



tf 



The standard features oj 
the SMOKE WHITER are: 



*a 
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• 80 x 24 display with 32 graphic 
characters. Optional character 
generator ROM with 128 ASCII 
characters plus 128 graphic 
characters. 

• Upper and lower case characters 
with lower case descenders. 



00 



• Programmable character set* a 
total of 128 characters in a 2K 
EPROM; a 256 character 4K 
EPROM is optional. 



• Reduced intensity or reversed 
video 



• Programmable display rate (10 to 
5000 character per second) equiva- 
lent to 100 to 50K baud. 

• Protected fields. 

• Addressable Cursor. 

• 2K video display RAM accessible 
by the CPU as standard RAM 
Memory. 



• IK EPROM for Software drivers. • 128 ttytes of Scratch pail RAM. 



If you have a need for a fast and dependable video display board. Smoke Signal 
liroadcasting has what you are looking for. The SMOKE It R ITER is right at 
home when used with a cursor based alitor or in a business program that needs 
protected fiehls. 



SMOKE SIMM 




BR01MSTM 



31336 Via Colinas, Westlake Village, CA 91361, (213) 889 9340 
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6809 PROCESSING POWER! 

The Percom SBC/9 . Only $199.95. 




Fully compatible w th he SS-50 
requiring no modification ol tf>e'mother 
board, memory cf l?D'^tet^- — irj. 
SBC/9 " is also a complete smgie- 
board control corrtptJtef wtth its own 
ROM operating!" system*,- -BAM_ 
peripheral ports and a lull-range bau" 
clock generator. 



Make the SBC/9 the heart of your computer and put to work 
the most outstanding microprocessor available, the 6809. 



(he Mighty 6809 

Featuring more addressing modes 
than any other eight-bit processor, 
posilion-independent coding, special 
16-bit instructions efficient argu- 
ment-passing calls automcrement/ 
autodecrement and more, it's no won- 
der the 6809 has been called the "pro- 
grammers dream machine ' 

Moreover, with the 6809 you gel a 
microprocessor whose programs typ- 
ically use only one-nalf to two-thirds as 
much RAM space as required for 6800 
systems, and run faster besides 

And to complement the extraordi- 
nary 6809, the Percom design team 
has developed PSYMON", an extraor- 
dinary 6809 operating system for the 
SBC/9" 
PSYMOfT— Percom SYsUm MONItor 

Although PSYMON" includes a full 
complemenl of operating system 
commands and 1 5 externally callable 



•trademark o* Percom Oata Company, fnc 



utiUies, whal really sets PSYMON' 
apart is its easy hardware adaptability 
and command extensibility 

For hardware interlacing, you 
merely use simple, specific device 
driver routines that reference a table of 
parameters called a Device Control 
Block (OCB) Using this technique, in- 
terfacing routines are independent of 
the operating system 

The basic PSYMON" command 
repertoire may be readily enhanced or 
modified When PSYMON'* lirst re 
ce*ves system control it initializes its 
RAM area, configures its console and 
then looks ahead' for an optional sec 
ond ROM which you install in a socket 
provided on the SBC/9' card This 
ROM contains your own routines that 
may alter PSYMON" pointers and 
eilher subtly or radically modify the 
PSYMON' command set if a second 
ROM is not installed, control returns 
immediately to PSYMON ■ 



Provision lor multi-address, 8-bit bidirec- 
tional parallel I/O data lines for interfao 
ing to devices such as an encoded 
keyftoajd 

A senai interface Reader Control output 
lor a cassette, tape punch/reader or simi- 
lar device 

An intelligent data bus: multi-level dele 
bus decoding that allows multiprocess- 
ing and bus multiplexing of other bus 
masters 

Extended address line capability — ac- 
commodating up to 16 megabytes ol 
memory — that does not disable the on- 
board baud rate clock or require addi- 
tional hardware In I/O slots. 
On-board devices wtuch are lully de- 
coded so that off-card devices may use 
adjoining memory space 
FuUy buffered addr s, control and data 
lines 



The 5BC/9* complete with PSYMON "in 
ROM, tK ol RAM and a comprehensive 
usef S manual * costs fust $ T 99 95 
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To place en order or request additional literatura 
call toll-free 1-800-527-1592. For technical infor- 
mation call [21 4) 272-3421 Orders may be paid by 
check, money order, COD or charged to a VISA or 
Master Charge account, Texas residents must add 
5% sales tax 



